楼主: sukuoxi
1900 0

[问答] R平方的k重交叉验证 《R语言实战》 p194页 问题 [推广有奖]

  • 0关注
  • 0粉丝

小学生

28%

还不是VIP/贵宾

-

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

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币

请问这几步什么意思??x, y,theta.fit,theta.predict 各代表什么??为什么这样算??

theta.fit<- function(x,y){lsfit(x,y)}     最小二乘法??
theta.predict<- function(fit,x){cbind(1,x)% * % fit$coef}       合并后的矩阵和回归模型的系数矩阵相乘??
       
x<-fit$model [, 2:ncol(fit$model) ]    训练样本?
y<-fit$model[,1]                              保留样本?
results <- crossval(x, y, theta.fit,  theta.predict, ngroup=k)      
r2 <- cor(y , fit$fitted.values)^2        初始R平方
r2cv <- cor(y , results$cv.fit)^2         交叉验证的R平方




二维码

扫码加我 拉你入群

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

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

关键词:R语言实战 交叉验证 R平方 R语言 predict

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

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-10-5 21:08