# NOT RUN {
library(survival)
fit<-khazard(times = lung$time,delta = lung$status-1)
plot(fit)
fit<-khazard(times = lung$time,delta = lung$status-1,h=c(100,150,200,250), value="both")
plot(fit,h=200)
# }
Run the code above in your browser using DataLab