按照网上的教程做，结果有报错，不知道是哪里出了问题，求指点，谢谢。
model<-decision_curve(formula1,data = data, family = binomial(link = 'logit'),thresholds=seq(0,1,by =0.01),confidence.intervals=0.95,study.design="cohort")
Error in decision_curve(formula1, data = data, family = binomial(link = "logit"), :
is.numeric(outcome) is not TRUE
直接凭感觉想想，估计是你的formula所指的因变量（~前面那个变量）不是数值型的，如果这个可以转为数值的话，可以用as.numeric(y)给它改一下