Survminer -排列多个ggsurvplot和ggadjustedcurves

k4ymrczo 于 2023-04-09 发布在其他

关注(0)|答案(1)|浏览(214)

我想合并survminer图（如arrange_ggsurvplots()）：ggsurvplot（对于Kaplan Meier模型）和ggadjustedcurves（对于考克斯）。

library(survminer)
fitKM  <- survfit(Surv(time, status) ~ sex, data = lung)
fitCox <- coxph(Surv(time, status) ~ sex, data = lung)
p1 = ggsurvplot(fitKM, data = lung)
p2 = ggadjustedcurves(fitCox, data = lung,variable = "sex")

当我这样做：

arrange_ggsurvplots(x = list(p1,p2))

我有

Error in FUN(X[[i]], ...) : An object of class ggsurvplot is required.

我该怎么做？

来源：https://stackoverflow.com/questions/75951005/survminer-arrange-multiple-ggsurvplot-and-ggadjustedcurves

1条答案

按热度按时间

k10s72fa1#

ggsurvplot对象是一个list，其中生存曲线的图存储为名为plot的元素，即ggplot对象，而ggadjustedcurves默认返回ggplot对象。
因此，合并两个图的一个选项是使用ggplot对象的可用选项之一，例如patchwork：

library(survminer)
library(survival)

fitKM  <- survfit(Surv(time, status) ~ sex, data = lung)
fitCox <- coxph(Surv(time, status) ~ sex, data = lung)
p1 = ggsurvplot(fitKM, data = lung)
p2 = ggadjustedcurves(fitCox, data = lung, variable = "sex")

library(patchwork)

p1$plot + p2

赞(0）回复(0）举报 2023-04-09

我来回答

Survminer -排列多个ggsurvplot和ggadjustedcurves

1条答案

相关问题

热门标签

最新问答