R/fit2final.R
fit2final.Rd
Make final model using stepwise backward elimination
fit2final(fit, threshold = 0.2)
An object of class "coxph"
Numeric
An object of class "coxph" which is described in coxph
coxph
require(survival) data(cancer) fit=coxph(Surv(time,status)~age+sex+obstruct+perfor,data=colon) final=fit2final(fit) fit2summary(final) #> id stats #> obstruct obstruct 1.27 (1.09-1.49, p=.003)