Используя функцию arrange_ggsurvplots(), чтобы иметь 4 ggsurvplot() в представлении 2x2, но с помощью этой функции он строит пустую страницу перед графиком из 4 групповых графиков.
Я строю 4 разных сурфита как:
library(survminer)
fit_1 <- survfit(Surv(...) ~ ..., data = data_1)
splots[[1]] <- ggsurvplot(fit_1,...)
Чтобы все это устроить:
arrange_ggsurvplots(splots, print = TRUE,
ncol = 2, nrow = 2)





Вам нужно сохранить сюжет как объект, а затем сохранить его на диск с помощью ggsave():
myplots_out <- arrange_ggsurvplots(
myplots,
print = FALSE,
ncol = 2,
nrow = 2,
title = "MySuperPlots")
ggsave(
myplots_out,
file = "Results/Survival.pdf",
width = 10.5,
height = 5)
Это позволит избежать появления пустой первой страницы в выходном файле.
Я думаю, что это проблема с пакетом, согласно руководству, код OP должен работать? (не тестировал)