使用 R 中的 survminer 包 (ggsurvplot) 更改审查事件的形状

Question

我正在使用 survminer 包在 R 中创建 Kaplan-Meier-Curve，效果非常好：

plotUICC=survfit(Surv(as.numeric(myData$eventtime),event=myData$eventtype)~myData$UICC, data = myData)

ggsurvplot(plotUICC,data=myData, risk.table = FALSE,pval = TRUE,conf.int = FALSE,legend.labs = c("UICC I", "UICC II"),legend = c(0.25, 0.26),legend.title = "",xlab = "Time in Months"))

用上面的 Cod 创建的 Kaplan Meier 曲线

我想将“+”更改为审查事件并使用简单的“|” 反而。不幸的是，帮助（ggsurvplot）和谷歌都无法帮助我。

---

这些是加载的包：

    other attached packages:
[1] ggthemes_3.4.0  survminer_0.3.1 ggpubr_0.1.2    ggplot2_2.2.1   survival_2.40-1
[6] readxl_0.1.1    gridExtra_2.2.1

Answer 1

一个最小的工作示例如下：

library(survminer)
library(survival)
fit <- survfit(Surv(time, status) ~ sex, data = lung)
p1 <- ggsurvplot(fit, data = lung)

理想情况下，人们希望改变审查器的形状，例如：

p2 <- ggsurvplot(fit, data = lung, censor.shape=124)

我发现没有办法用原始的 survminer 包来做到这一点。在 survminer 的一个分支中，我实现了这种行为，以便生成以下情节：

censor.shape 的可接受值可以在这里找到： http: //sape.inf.usi.ch/quick-reference/ggplot2/shape

我还没有对此进行彻底的测试，但是这个扩展对我来说已经非常有用了。“+”审查已经困扰我一段时间了......

编辑：此建议现已合并， ggsurvplot 的开发版本现在接受 censor.shape 和 censor.size 参数：

ggsurvplot(fit, data = lung, censor.shape="|", censor.size = 4)