你如何翻转 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()
):
我正在尝试为我的生存分析图翻转 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()
):