r - 使用 r 中的 survminer 包将风险表和 95% 置信区间添加到调整后的生存曲线
问题描述
我想在调整后的生存曲线中添加风险表和 95% 置信区间。类似于下面的生存曲线(链接)。我在这里看到了一些相关的代码,但没有提到我需要什么。
另一个问题,如果我在调整中使用获得的权重变量(来自iptw 包)是否正确(因为我在实际数据集中有一个名为 weight 的列。
这是我的代码:
library(survival);library(survminer)
data(lung);names(lung)
#fit <- coxph( Surv(time, status==2) ~ ph.karno + strata(sex), data = lung )
lung$sex <- ifelse(lung$sex == 1, "Male", "Female")
fit <- coxph(Surv(time, status) ~ ph.ecog + age +strata(sex), data = lung)
ggadjustedcurves(fit,
variable = "sex",
data = lung,
method = "average",
palette = c("#E69F00", "#56B4E9"),
size = 1.3,
legend = "right",
legend.title = expression(bold("Legend title")),
xlab = "Time",font.legend = 12) + theme(legend.text.align = 0.5)
解决方案
简短的回答:目前没有 R-Package 允许您直接绘制带有置信区间的混杂因素调整的生存曲线。然而ate
,在R-Package 中调用了一个函数riskRegression
,可用于在某些时间点以 95% 的置信区间计算调整后的生存概率估计值。如果你做了一些编码,你肯定可以使用那个来得到你想要的。
或者,您可以等待更长时间。我目前正在研究一个 R-Package,它实现了各种方法的混杂因素调整生存曲线(以及存在竞争风险时的累积发生率函数),并带有置信区间、假设检验、风险表等。
推荐阅读
- c# - 使用 C# 创建 Instagram 帐户
- android - 尝试使用 /kittinunf/fuel lib 从 android ver 9 及更低版本访问 tls 1.3 站点
- nopcommerce - 如何在 NopCommerce 4.40.3 中删除标签
- django - django-单击href链接会将我重定向到索引页面而不是指向的网页
- jquery - 如何修复停止 DIVI 编辑屏幕 DIVI 编辑器工作的 jQuery 错误
- mongodb - 如何对数组中的特定数组求和?
- reactjs - Mongosse new Modal() 在 Next js App 中不起作用?
- radix-sort - 基数排序中的数组访问
- flutter - Flutter Flame 中的滚动背景
- html - 在反应中分享网址的图标的动态变化