model1<- decision_curve(formula1,data=data,
family=binomial(link = 'logit'),
thresholds=seq(0,1,by=0.01),
confidence.intervals=0.95,study.design='cohort')
plot_decision_curve(model1,curve.names = c('1'),xlim=c(0,0.8),
cost.benefit.axis = FALSE,col=c('red'),
confidence.intervals = FALSE,standardize = FALSE)
改变图例大小在legend函数中添加cex=0.75等,在plot_decision_curve函数里指定一下图例位置:legend.position="topright",“right”,'none"等试试。参考这里:
https://www.jianshu.com/p/bbdd70761cd8
你好,,你的问题解决了吗