Displaying 1 result from an estimated 1 matches for "glevel".
Did you mean:
level
2007 Jan 22
0
Recursive-SVM (R-SVM)
...pInd %in% TrainInd ))]
}
}
nTests <- nTests + length(TestInd)
## in each level, train a SVM model and record test error
xTrain <- x[TrainInd, ]
yTrain <- y[TrainInd]
xTest <- x[TestInd,]
yTest <- y[TestInd]
## index of the genes used in the
SelInd <- seq(1, nGene)
for( gLevel in 1:length(ladder) )
{
## record the genes selected in this ladder
SelFreq[SelInd, gLevel] <- SelFreq[SelInd, gLevel] +1
## train SVM model and test error
svmres <- svm(xTrain[, SelInd], yTrain, scale=F, type="C-classification", kernel="linear" )
if( CVtype == "...