powered by
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