Displaying 1 result from an estimated 1 matches for "srvgasta".
2011 Apr 06
1
Error in match.names(clabs, names(xi))
...,2950,
17,42,44,48,60,72,74,95,103,108,122,144,167,170,183,185,193,195,197,
208,234,235,254,307,315,401,445,464,484,528,542,547,577,580,795,855,
1366,1577,2060,2412,2486,2796,2802,2934,2988), Dth=c(rep(1,43),
0,0, rep(1,39), rep(0,6)))
CoxG0 <- coxph(Surv(time,Dth) ~ Gp, Gastric)
srvGastA <- survfit(Surv(Gastric$time,Gastric$Dth)~1) ## 88 distinct times
#Gastric$time is all the time points either death or largest obervation
time.
#srvGastA$time is all the unique times
newGas <- data.frame(start=0, stop=1, Dth=1, Ploidy=1, tim=0)
#newGas <- r(0,1,1,1,0)
for (i in 2:90) {...