R语言ggsurvplot绘制生存曲线报错 : object of type ‘symbol‘ is not subsettable

原文链接：http://tecdat.cn/?p=14683

预期

绘制生存曲线图

实际

object of type ‘symbol‘ is not subsettable

重现问题的步骤

1.  
   library(survminer)
2.  
   #> Le chargement a nécessité le package : ggplot2
3.  
   #> Le chargement a nécessité le package : ggpubr
4.  
   #> Warning: le package 'ggpubr' a été compilé avec la version R 3.4.3
5.  
   #> Le chargement a nécessité le package : magrittr
6.  
   require("survival")
7.  
   #> Le chargement a nécessité le package : survival
8.  
   survie <- Surv(time, status) ~ sex
9.  
   fit<- survfit(survie, data = lung)
10.  
     
11.  
    ggsurvplot(fit, data = lung)
12.  
    #> Error: objet de type 'symbol' non indiçable

ggsurvplot（）尝试从对象中捕获生存公式Surv(time, status) ~ sex，如下所示：  fit$call$formula。

通过分解R代码，执行fit $ call $ formula的结果是“ survie”而不是  Surv(time, status) ~ sex 。这将导致错误消息。

请拟合并可视化生存曲线，如下所示：

1.  
   library(survival)
2.  
    
3.  
   fit <- survfit(Surv(time, status) ~ sex, data = lung)
4.  
    
5.  
   ggsurvplot(fit, data = lung)

如果您仍然想分解R代码，那么我建议使用surv_fit() [survminer软件包中的] 函数  ，它是对R基本函数的扩展，  survfit() 具有更多功能

您可以按以下方式使用它：

1.  
   survie <- Surv(time, status) ~ sex
2.  
    
3.  
   fit <- surv_fit(survie, data = lung)
4.  
    
5.  
   ggsurvplot(fit, data = lung)

---

参考文献

1.如何解决线性混合模型中畸形拟合(SINGULAR FIT)的问题

2.在UBUNTU虚拟机上安装R软件包

3.WINDOWS中用命令行执行R语言命令