Displaying 1 result from an estimated 1 matches for "predictions4".
Did you mean:
predictions
2013 Jan 08
0
bagging SVM Ensemble
..."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(predictions2==0)
yesboot2<-sum(predictions2==1)
voteboot2<-c()
if(yesboo...