你如何翻转 ggsurvplot 中的坐标?

How do you flip the coordinates in ggsurvplot?

我正在尝试为我的生存分析图翻转 x 和 y(使用 survival/survminer 包),但是当我将 coord_flip() 添加到这行代码时:

ggsurvplot(poop_fit, data = egg.data, pval = TRUE, conf.int = TRUE, coord_flip())

我收到这个错误:

Error in .apply_surv_func(df, fun = fun) : Invalid 'fun' argument

有谁知道在生存分析中有没有另一种翻转坐标的方法?

您可以 access/manipulate 通过使用“$plot”访问绘图,例如ggsurvplot(fit, data = lung)$plot。例如:

require("survival")
require("survminer")

fit<- survfit(Surv(time, status) ~ sex, data = lung)

ggplot1 <- ggsurvplot(fit, data = lung)$plot
df1 <- data.frame(time=fit$time, nRisk=fit$n.risk, nRiskRel=fit$n.risk/max(fit$n.risk))  
ggplot1 + geom_point(aes(x=time, y=nRiskRel), data = df1, alpha=0.5, size=3)
ggplot1 + coord_flip()

预翻转(无+ coord_flip()):

Post-翻转(+ coord_flip()):