Displaying 1 result from an estimated 1 matches for "stat_true".
2010 Nov 23
5
cross validation using e1071:SVM
...ol(trainset)]
train1<-train1[,-(1)]
test_t<-testset[,-ncol(testset)]
species_test<-as.factor(testset[,ncol(testset)])
test_t<-test_t[,-(1)]
model_true1 <- svm(train1,species)
pred_true1<-predict(model_true1,test_t)
stat_result<- confusionMatrix(pred_true1,species_test)
stat_true[[i]]<-as.matrix(stat_result,what="overall")
kappa_true[i]<-stat_true[[i]][2,1]
accuracy_true[i]<-stat_true[[i]][1,1]
}
--
View this message in context: http://r.789695.n4.nabble.com/cross-validation-using-e1071-SVM-tp3055335p3055335.html
Sent from the R help mailing list arch...