
因为都是ggplot体系的图表,很容易拼接,但是里面的生存分析是一个麻烦事情。因为它本身主要是survminer包出图,而这个survminer包出图并不是很稳定,但是学员自己解决了这个问题。
可以先用survminer包的arrange_ggsurvplots函数对多个生存分析图表进行拼接 。
- library(survminer)
- splots <- list()
- # 其中 p3和p4的前面生存分析km曲线哦
- splots[[1]] <- p3
- splots[[2]] <- p4
- merge<-arrange_ggsurvplots(splots, print = TRUE,
- ncol = 2, nrow = 1)#定义行数