Displaying 1 result from an estimated 1 matches for "shortpar".
Did you mean:
shorter
2009 Oct 05
0
Unusual error while using coxph
...amp;
data$all.parlob[i]=="N" && data$all.occlob[i]=="N" &&
data$all.notspec[i]=="N")
dummy[i] <- i
if(data$all.frontlob[i]=="Y" && data$all.parlob[i]=="Y")
dummy[i] <- i
}
return(data[-dummy,])
}
shortpar <- par(nearma)
shortrpa <- randp(shortpar)
lobe <- function(data)
{
for(i in 1:nrow(data)){
if(is.na(data$all.frontlob)[i])
data$all.frontlob[i] <- "N"
if(is.na(data$all.templob)[i])
data$all.templob[i] <- "N"
if(is.na(data$all.occlob)[...