Displaying 2 results from an estimated 2 matches for "probb".
Did you mean:
probe
2012 Oct 23
1
repeat takes along time
Hi
I want help for "repeat" because it takes a long time
repeat{
for (i in 1:n){
probb[i]=sum(Wc[z[,j]>=yb[i]])
}
deltab[,b]=rbinom(n,1,probb)
if(length(which(is.na(deltab[,b])==T))==0){break}
}
This code works but takes much computation time.
Anyone could help me to find a solution to take a shor time.
Thanks
Jorge
--
View this message in context: http://r.789695.n4.nabble...
2011 Nov 30
0
formula for calculating the survival probability for nomogram
..._PCDK2=='Positive')*nom[[7]]$points[2]
summary(tot.points)
data22 <- data.frame(retime=retime, dfs=dfs, tot.points=tot.points)
fit <- cph(Surv(retime, dfs) ~ tot.points,data=data22 ,surv=T, x=T, y=T,
time.inc=5)
survff <- survfit.cph(fit, newdata=data22)
times <-survff$time
probb <- survff$surv
############# 5 year ##################
indd <- times==times[times<=5][length(times[times<=5])]
probb2 <- probb[indd,] ## 5-year surv prob for each patient
I would very much appreciate any assistance in this matter.
Thank you Very much.
Min
--
View this messa...