Displaying 1 result from an estimated 1 matches for "predictions3".
Did you mean:
predictions
2013 Jan 08
0
bagging SVM Ensemble
...ernel = "radial")
modeltan4 <- svm(class ~ ., sboot, type = "C-classification", cost = cc,gamma = gg, kernel = "sigmoid")
predictions1<- predict(modellin1,newdata=testset, decision.values=F)
predictions2<- predict(modelpoly2,newdata=testset, decision.values=F)
predictions3<- predict(modelrad3,newdata=testset, decision.values=F)
predictions4<- predict(modeltan4,newdata=testset, decision.values=F)
noboot1<-sum(predictions1==0)
yesboot1<-sum(predictions1==1)
voteboot1<-c()
if(yesboot1>noboot1) voteboot1<-1 else voteboot1<-0
noboot2<-sum(predic...