新手急求！一段R程序，运行的时候老是出错，请高手们帮忙看一下，感激不尽！

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

library（gam）

data <- read.csv("C:\\Users\\user\\Desktop\\1.csv", header=TRUE)

f <- 0;ok <- TRUE

while (ok) {

for (i in 1:3) {

ep <- y - rowSums(f[, -i])

b <- smooth.spline(x[, i], ep, df = edf)

f[, i] <- predict(b, x[, i])$y

}

rss <- sum((y - rowSums(f))^2)

if (abs(rss - rss0) < 1e-6*rss) ok <- FALSE;

rss0 <- rss

}
就是这一段程序，运行的时候总是很多错误，请高手们帮帮忙看看哪有问题，先谢过啦！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：感激不尽 R程序 Library BRARY Data 程序

望不吝赐教，谢谢

不知道你的数据是什么样子的，但是开始你的f是一个数字0，
rowSums(f[, -i])时就会出错了。

qoiqpwqr 发表于 2013-5-10 00:55
不知道你的数据是什么样子的，但是开始你的f是一个数字0，
rowSums(f[, -i])时就会出错了。

数据是四组时间序列，分别是被解释变量y，解释变量x1,x2,x3
是我写错了，应该是y<-x*0,但是又提示找不到x，这是怎么回事

Grace双鱼 发表于 2013-5-10 08:57
数据是四组时间序列，分别是被解释变量y，解释变量x1,x2,x3
是我写错了，应该是y

请把完整程序和数据发出来

qoiqpwqr 发表于 2013-5-10 11:03
请把完整程序和数据发出来

数据
就只是这一段程序

Grace双鱼 发表于 2013-5-10 08:57
数据是四组时间序列，分别是被解释变量y，解释变量x1,x2,x3
是我写错了，应该是y

y<-x*0是什么意思？你的程序里面根本就没有x

qoiqpwqr 发表于 2013-5-10 22:41
y

我也不懂，这是一篇文章中的程序，里面是这么写的。。。
这个问题是这样的麻烦帮我看看吧，万分感谢

qoiqpwqr 发表于 2013-5-10 22:41
y

大侠帮帮忙吧

运行的时候总是提示   Error in f[, -i] : incorrect number of dimensions。这是怎么回事
知道的大侠们帮帮忙