rpy绘制nomogram，risk较为集中

在nomogram函数里，把最长的变量的取值范围调整一下。
如

r('nomo <- nomogram(clf, rad_sig=seq(-3,3,1), fun= plogis, fun.at=fun.at, funlabel="Risk", lp=F)')

里面的rad_sig