使用R中的survminer包(ggsurv图)更改受删事件的形状

Question

我正在使用survminer软件包在R中创建一个Kaplan-Meier曲线，它运行得很好：

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曲线

我想改变"+“作为审查事件，并使用一个简单的”\“代替。不幸的是，无论是帮助还是谷歌都帮不了我。

这些是装载的包装：

    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的分叉中，我实现了这个行为，因此产生了以下情节：

​

​

可以在这里找到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)