有没有办法控制ggcuminc中组的顺序？

Question

使用 ggcuminc 创建绘图时，我找不到更改级别的自动字母顺序的方法

trial2 <- trial |> 
mutate(grade2 = fct_recode(grade, one = "I", two = "II", three = "III"))

levels(trial2$grade2)
# [1] "one"   "two"   "three"

p1 <- cuminc(Surv(ttdeath, death_cr)~grade, data = trial2) |> 
  ggcuminc()

p2 <- p1 <- cuminc(Surv(ttdeath, death_cr)~grade, data = trial2) |> 
  ggcuminc()

有没有办法改变 Grade2 图 (p2) 的级别，使图例显示“一 - 二 - 三”而不是“一 - 三 - 二”？ （参见图片并比较 p1 和 p2）

Answer 1

实现所需结果的一个选项是通过色标的

limits=

参数设置顺序，即默认色标的

scale_color_discrete

：

library(tidyverse)
library(ggsurvfit)
library(tidycmprsk)
#> Registered S3 method overwritten by 'tidycmprsk':
#>   method                    from     
#>   global_pvalue_fun.tidycrr gtsummary

trial2 <- trial |>
  mutate(grade2 = fct_recode(grade, one = "I", two = "II", three = "III"))

cuminc(Surv(ttdeath, death_cr) ~ grade2, data = trial2) |>
  ggcuminc() +
  scale_color_discrete(limits = levels(trial2$grade2))
#> Plotting outcome "death from cancer".