我有一个数据集,需要比较治疗A和治疗B之间的生存率使用冲浪者。
我想要治疗A作为我的参考,但R自动指定引用为治疗B,并给我的人力资源错误的方式(对于治疗B,但我希望它为治疗A)
下面是我的示例数据:
library(survival)
library(survminer)
library(gt_summary)
id time event treatment
<chr> <dbl> <dbl> <chr>
1 NA 59.2 0 B
2 NA 14.0 1 B
3 NA 10.6 0 B
4 NA 2.79 1 B
5 NA 21.4 0 B
6 NA 1.84 0 A
7 NA 41.9 0 A
8 NA 5.59 0 A
9 NA 26.8 1 A
10 NA 6.81 0 A
df$treatment <- factor(df$treatment, levels=c("A", "B"))
os_chemo_io <- survfit(formula = Surv(time = time, type = 'right', event = event)~treatment, data = df)
coxph(Surv(time, event) ~ treatment, data=df) %>%
gtsummary::tbl_regression(exp=TRUE)
发布于 2022-02-03 19:36:15
试试这个函数:df$热处理<- relevel(处理,ref = A)
https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/relevel
在此之前,将“治疗”作为一个因素:df$热处理<- as.factor(df$处理)
https://stackoverflow.com/questions/70977228
复制相似问题