r - R中的rms包中的nomogram（）函数错误

Question

美好的一天，当我尝试使用rmsR 中的包绘制列线图时，我遇到了这个问题。我从 SPSS 传输了我的数据以绘制列线图，最后，它给了我这个消息。

列线图错误（fit.reg22）：重复的变量标签：0 1 0 1

我该如何解决这个问题？请帮助TT。谢谢

dd <- datadist(thickness_forR_1)
options(datadist = "dd")
boxcox((ALT.ave + 1) ~ age50+ BMI23+ genderRE, data= thickness_forR_1)
thickness_forR_1 <- thickness_forR_1 %>%
   mutate(ALT2 = log(ALT.ave + 1))
fit.reg22<-ols(ALT2 ~ age50 + BMI23 + genderRE, data=thickness_forR_1, x = TRUE, y = TRUE)
summary(fit.reg22)
             Effects              Response : ALT2 

 Factor   Low High Diff. Effect   S.E.     Lower 0.95 Upper 0.95
 age50    0   1    1     -0.35188 0.064244 -0.47855   -0.22522  
 BMI23    0   1    1      0.31013 0.048472  0.21456    0.40570  
 genderRE 0   1    1      0.55111 0.054465  0.44373    0.65850  

plot(nomogram(fit.reg22))

列线图错误（fit.reg22）：重复的变量标签：0 1 0 1

r_data_frame(
  n =216,
  thickness_forR_1)
  A tibble: 216 x 5
       age50     BMI23  genderRE ALT.ave  ALT2
   <dbl+lbl> <dbl+lbl> <dbl+lbl>   <dbl> <dbl>
 1  0 [<50]   1 [>=23]     0 [M]   10.3   2.43
 2  1 [>=50]  0 [<23]      0 [M]    4.00  1.61
 3  1 [>=50]  0 [<23]      1 [F]    5.92  1.93
 4  1 [>=50]  0 [<23]      0 [M]    3.85  1.58
 5  1 [>=50]  0 [<23]      0 [M]    4.66  1.73
 6  0 [<50]   1 [>=23]     0 [M]    6.21  1.98
 7  1 [>=50]  1 [>=23]     0 [M]    8.06  2.20
 8  1 [>=50]  1 [>=23]     1 [F]    6.3   1.99
 9  1 [>=50]  1 [>=23]     0 [M]    8.59  2.26
10  0 [<50]   0 [<23]      1 [F]   14.9   2.76
# ... with 206 more rows

标签： rrms