NADA包cenboxplot(删失箱线图)修改X轴排序问题咨询

问题原因 #

cenboxplot函数内部默认按分组变量的字符字母顺序排列X轴，不会读取因子的自定义level配置，因此直接修改原数据的因子顺序无法生效。

解决方案 #

方案1：使用内置grouporder参数（推荐） #

直接在函数调用时通过grouporder参数指定X轴分组的展示顺序即可，无需修改原数据：

library(NADA)
data(Golden)

cenboxplot(
  obs = Golden$Blood,
  cens = Golden$BloodCen,
  group = Golden$DosageGroup,
  # 按需求指定X轴分组顺序
  grouporder = c("Low", "High")
)

方案2：手动自定义X轴 #

如果使用的包版本无grouporder参数，可先关闭自动X轴输出，再手动添加指定顺序的X轴：

library(NADA)
data(Golden)
# 先设置因子自定义顺序
Golden$DosageGroup <- factor(Golden$DosageGroup, levels = c("Low", "High"))

# 绘图时禁用X轴
cenboxplot(Golden$Blood, Golden$BloodCen, Golden$DosageGroup, xaxt = "n")
# 按因子level手动添加X轴
axis(side = 1, at = 1:nlevels(Golden$DosageGroup), labels = levels(Golden$DosageGroup))

原默认排序运行结果 #

内容的提问来源于stack exchange，提问作者user918967