gtest <- survival::coxph(survival::Surv(stop, event) ~ rx + size + number,
survival::bladder)
torn <- tornado(gtest, modeldata = survival::bladder, type = "PercentChange",
alpha = 0.10)
plot(torn, xlabel = "Risk")
Run the code above in your browser using DataLab