svm 的R实现

这篇博客介绍了如何在R中实现SVM(支持向量机)模型,从数据预处理、k折交叉验证选择参数到模型训练和预测。通过读取CSV文件,对数据进行归一化处理,然后利用e1071包进行SVM的参数调优,特别是关注了gamma和cost参数。最后,博主展示了预测结果的准确性验证方法。
摘要由CSDN通过智能技术生成

1.数据准备本地文件格式:

hour15, hour15diff, hour17, hour17diff, addrate, lastflag, res

23.7475, -9.3125, 30.5800, -12.7600, -3.4475, 0, 0 

24.6150, -10.3050, 31.7625, -13.5175, -3.2125000000000004, 0, 0 

22.7575, -8.5625, 30.9513, -10.6588, -2.0962999999999994, 0, 0 

19.7963, -8.0038, 29.9200, -8.9000, -0.8962000000000003, 0, 0 


2.读取数据到R

trainModel = read.table('/xxx/xx/train.csv',header=TRUE,sep=',')


3.数据格式处理

简单的大小归一化:

trainModel['hour15'] = trainModel['hour15'] /10

trainModel['hour17'] = trainModel['hour17] /10

trainModel['hour15diff'] = trainModel['hour15diff']/5

...


4.k折交叉验证svm参数选择

library('e1071')

obj = tune.svm(res~.,data=trainModel,gamma = 1,

  • 1
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值