powered by
data(tobin)
data(tobin) tfit <- survreg(Surv(durable, durable>0, type='left') ~age + quant, data=tobin, dist='gaussian') predict(tfit,type="response")
Run the code above in your browser using DataLab