lss(formula, data, subset, trace = FALSE, mcsize = 500, maxiter = 10, tolerance = 0.001, gehanonly = FALSE, cov = FALSE, na.action = na.exclude)
data(stan)
fit1<-lss(cbind(log10(time),status) ~ age + t5,data=stan,subset=!is.na(t5), mcsize=100,trace=TRUE,gehanonly=FALSE,maxiter=10,tolerance=0.001)
fit2<-lss(cbind(log10(time),status) ~ age + I(age^2),data=stan,subset=!is.na(t5)&time>=100,mcsize=5,trace=TRUE, gehanonly=FALSE,cov=TRUE)
Run the code above in your browser using DataLab