Displaying 1 result from an estimated 1 matches for "correctstumat".
2009 Nov 16
1
No Visible Binding for global variable
...ct'), bonf = c('yes','no'), con = 1e-12, lower = 0, upper = 50){
bonf <- tolower(bonf)
bonf <- match.arg(bonf)
rfa <- match.arg(rfa)
rfa <- tolower(rfa)
dat <- t(dat)
correctStuMat <- numeric(ncol(dat))
for(i in 1:ncol(dat)){
correctStuMat[i] <- mean(key==dat[,i], na.rm= TRUE)
}
correctClsMat <- numeric(length(key))
for(i in 1:length(key)){...