楼主: suidoc
1829 0

[问答] 支持向量回归+RFE报错,求助 [推广有奖]

  • 0关注
  • 0粉丝

初中生

42%

还不是VIP/贵宾

-

威望
0
论坛币
16 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
173 点
帖子
5
精华
0
在线时间
16 小时
注册时间
2017-1-7
最后登录
2017-10-22

楼主
suidoc 发表于 2017-8-30 11:07:02 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
各位专家,我想用caret包实现支持向量回归+RFE,用的是包内自带的iris数据,代码如下:
library(caret)

x<-iris[,-1]
y<-iris[,1]
subsets <- c(1:5, 10, 15, 20, 25,30,35,40,45,50,55)
set.seed(24)
fiveStats <- function(...) c(twoClassSummary(...), defaultSummary(...))
caretFuncs$summary <- fiveStats
fitControl <- trainControl(method = "cv", repeats = 5, classProbs = F, summaryFunction = fiveStats, search = "grid",savePredictions = T)
tunegrid <- expand.grid(.sigma = 2^(-10:4), .C=2^(-4:10))
rfe.full <- rfeControl(functions = caretFuncs,   method = "cv", repeats = 5,  verbose = FALSE)
svmProfile <- rfe(x,y,  sizes = subsets, metric = "RMSE",  trControl = fitControl,  rfeControl = rfe.full)


这段代码运行结果报错:Error in `$<-.data.frame`(`*tmp*`, "y", value = numeric(0)) : replacement has 0 rows, data has 10


请教专家,应该怎样解决呢,谢谢!



二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:Library BRARY Care ARE RET

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-31 05:52