[R] Weibull survival regression

2004-11-23 Thread Eric Lim
ed to obtain the solution by combining the two solutions: lung.wbs <- survreg( Surv(futime, status)~ 1, data=lung, dist='weibull') plot (survfit(Surv(futime,status)~1, data=lung)) curve (exp (- (exp( lung.wbs$coef[1])*x)^(1/lung.wbs$scale)), col="black", add=T, from=0, t

[R] Weibull survival regression

2004-11-22 Thread Eric Lim
o be doing / understanding wrongly? Regards, Eric Lim Papworth Hospital Cambridge, UK futime status [1,] 0.4000 1 [2,] 0.8000 1 [3,] 7.1000 1 [4,] 3. 1 [5,] 0.6333 1 [6,] 9.9333 1 [7,] 0.5000 1 [8,] 6.93