##Survival
###Chapter 4
#Surv(start, stop, delta)
summary(surfit(Surv(time,delta)~1,data=d1, subset=(type==1),conf.type="plain"))
##conf.type= plain or log or log-log or arcsin.
###Left-truncation data
#Surv(start, stop, delta)
survfit(Surv(erntry-0.01, death, delta)~1, data = dd, subset = entry>30)