svm
WANGChang
2016年2月18日
n=150
p=2
sigma = 1
meanpos = 0
meanneg =3
npos = round(n/2)
nneg = n-npos
##生成数据中正负实例样本特征值
xpos = matrix(rnorm(npos*p,mean =meanpos,sd = sigma),npos,p)
xneg = matrix(rnorm(nneg*p,mean =meanneg,sd = sigma),npos,p)
x = rbind(xpos,xneg)
##生成类别标签
y = matrix(c(rep(1,time =npos),rep(-1,nneg)))
##rep()函数指的是后面重复前面次数
##观察数据发现数据线性可分
plot(x,pch = ifelse(y>0,1,2),xlab = "",ylab = "")
legend("topleft",c('Positive','negative'),pch = seq(2),text.col = seq(2))
##pch为点的形状类别,text.col指颜色类别