R语言支持向量机做回归代码

可以使用R语言中的e1071库来实现支持向量机做回归的代码，具体的实现步骤如下：

1. 安装e1071库

install.packages("e1071")

2. 载入e1071库

library(e1071)

3. 读入数据

data <- read.csv("data.csv")

4. 拆分数据集

train_data <- data[1:80, ]
test_data <- data[81:100, ]

5. 构建支持向量机模型

svm_model <- svm(target_column ~ ., data = train_data, kernel = "radial", cost = 1, gamma = 0.1)

其中，target_column是待预测的目标变量，.代表使用除了目标变量之外的所有变量进行预测。kernel参数指定核函数的类型，cost和gamma分别表示SVM模型的惩罚系数和核函数的参数。

6. 预测结果

svm_predict <- predict(svm_model, test_data)

7. 计算预测结果的RMSE值

rmse <- sqrt(mean((test_data$target_column - svm_predict)^2))

上述代码中，test_data$target_column表示测试集中的目标变量值，svm_predict表示用SVM模型预测得到的目标变量值。RMSE是常用的回归算法的效果评估指标，用于衡量预测值与真实值之间的误差大小。