# NOT RUN {
data(sim.data)
fit <- recEvFit(Surv(start2, stop2, status)~x+x.1+x.2, data=sim.data,
id="nid", prevEp = "obs.episode",
riskBef = "risk.bef", oldInd = "old", frailty=FALSE, m=5)
summary(fit)
# }
Run the code above in your browser using DataLab