powered by
lbfit.nonpar(time, censor, initial = list(maxiter = 500, tol = 1e-06))
lbsurvfit
lbfit.par
lbsample
mydata=lbsample(500,family="exponential",par=list(rate=1)) lbfit.nonpar(time=mydata$data,censor=mydata$censor)
Run the code above in your browser using DataLab