R语言中的svm实例

本文通过R语言展示了如何使用kernlab包构建支持向量机模型,从数据生成、训练、预测到评估模型性能,包括绘制ROC曲线和计算查准率与查全率。示例数据线性可分,模型训练后得到100%的准确率,并解释了支持向量的重要角色。
摘要由CSDN通过智能技术生成

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指颜色类别

  • 6
    点赞
  • 36
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值