Displaying 1 result from an estimated 1 matches for "svm12".
Did you mean:
hvm12
2005 May 12
2
SVM linear kernel and SV
...atsredeq.txt',header=T,sep="")
plot(catseq$Hwt,catseq$Bwt,pch=as.integer(catseq[,2]),col=as.integer(catseq[,2]),xlab="poids
du coeur",ylab="poids du corps")
title(main="Données 'chats' (cas séparable)")
catseq <- catseq[,2:4]
attach(catseq)
svm12 <- svm(Sex~.,data=catseq,kernel="linear",scale=T)
svm12
x11()
plot(svm12,catseq,grid=200)
x11()
svm22 <- svm(Sex~.,data=catseq,kernel="linear",scale=F)
svm22
plot(svm22,catseq,grid=200)
[[alternative HTML version deleted]]