经管之家送您一份
应届毕业生专属福利!
求职就业群
感谢您参与论坛问题回答
经管之家送您两个论坛币!
+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平方
扫码加我 拉你入群
请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
|