GGIF（xi>；xj）1L else-1L中的调整曲线survminer错误

我正在尝试使用survminer使用ggadjustedcurves（）创建调整后的生存曲线。 我的代码如下：

adjustedcurve <- coxph(Surv(time_DeathTxCensor, deadORtx==1) ~ strata(natADI_quart) + sex + FVCpctPre + DLCOpctPre + smokeHx + age_dx, data=ADI, id=ID)
ggadjustedcurves(adjustedcurve,
                 variable="natADI_quart",
                 method="conditional",
                 data=ADI)

---

我不知道这意味着什么，也不知道如何修复它。非常感谢您的帮助：）

问题出现在survminer adjusted curves函数中，该函数试图通过使用变量名称从数据集编制索引来排序因子变量的唯一级别

这会抛出一个错误

如果您愿意编辑软件包中的函数，可以从以下位置检索它们：

。。并通过替换以下三种情况来修复错误：

lev <- sort(unique(data[,variable]))

---

lev问题出现在survminer adjusted curves函数中，该函数试图通过使用变量名称从数据集中编制索引来对因子变量的唯一级别进行排序

这会抛出一个错误

如果您愿意编辑软件包中的函数，可以从以下位置检索它们：

。。并通过替换以下三种情况来修复错误：

lev <- sort(unique(data[,variable]))

lev Oops抱歉，这本应该是一个注释OK我检查了代码并做了这些更改，但是当我运行代码时，我现在遇到以下错误：错误在.get_data（fit，data）：找不到函数“.get_data”我不太清楚这是不是在一个我还没有下载的软件包中….？啊，这是一个帮助函数-你可以从实用程序脚本中获取它：太棒了！成功了。非常感谢你！！Oops抱歉，这本应该是一个注释OK我检查了代码并做了这些更改，但是当我运行代码时，我现在得到以下错误：在.get_data（fit，data）中出错：找不到函数“.get_data”我不太清楚这是不是在一个我还没有下载的软件包中….？啊，这是一个帮助函数-你可以从实用程序脚本中获取它：太棒了！成功了。非常感谢你！！
lev <- sort(unique(pull(data, variable)))