Displaying 1 result from an estimated 1 matches for "gseq".
Did you mean:
cseq
2010 Sep 30
1
Can this code be written more efficiently?
..."forever" to run (more than 1 day already and still running). I'm
wondering if there's any way I can optimize this code. Thanks in advance
for any help.
I'm using 64-bit R 2.11.1 on Win 7.
####Start Code####
library(e1071)
library(ROCR)
### Create grid of hyperparameters
Gseq <- seq(-15,3,2); G <- rep(2, length(Gseq)); G <- G^Gseq
Cseq <- seq(-5,13,2); C <- rep(2, length(Cseq)); C <- C^Cseq
mygrid <- expand.grid(C=C, G=G)
### Train models
svm.models <- lapply(1:nrow(mygrid), function(i) {
svm(churn.form, data = mytraindata,...