nom <- nomogram(f2, fun=function(x) med(lp=x), funlabel="Median Survival Time") plot(nom) ## 绘制COX回归生存概率的Nomogram图 ## 注意lung数据的time是以’天‘为单位 nom <- nomogram(f2, fun=list(function(x) surv(365, x), function(x) surv(730, x)), funlabel=c("1-year Survival...
## 绘制COX回归中位生存时间的Nomogram图 nom <- nomogram(f2, fun=function(x) med(lp=x), funlabel="Median Survival Time") plot(nom) ## 绘制COX回归生存概率的Nomogram图 ## 注意lung数据的time是以’天‘为单位 nom <- nomogram(f2...
f2 <- psm(Surv(time,status) ~ age+sex, data = lung, dist='lognormal')med <- Quantile(f2) # 计算中位生存时间surv <- Survival(f2) # 构建生存概率函数## 绘制COX回归中位生存时间的Nomogram图nom <- nomogram(f2, fun=function(x) med(lp=x),funlabel="Median Survival Time")plot(nom)##...
边框 xlim=c(0.3,0.7),ylim=c(0.3,0.8),xlab="Nomogram-prediced OS (%)",ylab="Observed OS (%)",col=c("#2166AC"),cex.lab=1.2,cex.axis=1,cex.main=1.2,cex.sub=0.6)lines(cal300[,c('mean.predicted',"KM")],type='b',lwd=1,col=c("#2166AC"),pch=16)mtext("")plot(cal500...
xlab = "Nomogram-Predicted Probability of 1-Year OS", ylab = "Actual 1-Year DFS (proportion)", col = c(rgb(192, 98, 83, maxColorValue = 255)), subtitles = FALSE, main = "Calibrate plot") Figure 2:calibrate {rms} 2. plotCalibration {PredictABEL} ...
nom <- nomogram(f2, fun=function(x) med(lp=x), funlabel="Median Survival Time") plot(nom) ## 绘制COX回归生存概率的Nomogram图 ## 注意lung数据的time是以’天‘为单位 nom <- nomogram(f2, fun=list(function(x) surv(365, x),
需求描述 画出paper里的nomogram图和校准曲线 出自https://linkinghub.elsevier.com/retrieve/pii/S1470-2045(...
医学统计与R语言:你知道nomogram的points和total points怎么算吗? 医学统计与R语言:Cleveland dot plot 医学统计与R语言:交互作用模型中分组效应及标准误的计算 医学统计与R语言:多条ROC曲线的AUC多重比较 医学统计与R语言:来,今天学个散点图! 医学统计与...
plot(cal1, #lwd = 2, #误差线粗细 lty = 0, # 误差线类型,可选0-6 errbar.col = c("#2166AC"), # 误差线颜色 xlim = c(0.4,1),ylim= c(0.4,1), xlab = "Nomogram-prediced OS (%)",ylab = "Observed OS (%)", cex.lab=1.2, cex.axis=1, cex.main=1.2, cex.sub=0.6) # ...
cph or psm返回对象cal<-calibrate(res.cox1,cmethod='KM',method="boot",u=365,m=38,B=228)plot(cal,lwd=2,lty=1,errbar.col=c(rgb(0,118,192,maxColorValue=255)),xlab="Nomogram-Predicted Probability of 1-Year OS",ylab="Actual 1-Year DFS (proportion)",col=c(rgb(192,98,83,maxColor...