R语言的一个简单FOR循环

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

我要求第二列至第九列数据分别与第一列数据之间的回归，我写的程序为
   for(i in 2:ncol(z)){
     n.i<-z[,i]
     a=lm(z[,1]~n.i,data=z)
   } #z为数据集


结果只出现最后一列与第一列之间的线性关系，请问应该怎么写，刚接触程序语言，谢谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：for循环 For R语言 NCO 程序

   for(i in 2:ncol(z)){
     n.i<-z[,i]
     i=i+1
     a=lm(z[,1]~n.i,data=z)
   }
试一下，不保证

zlgsx 发表于 2015-1-28 18:49
for(i in 2:ncol(z)){
     n.i

谢谢，不过结果一样

不太清楚楼主的意思，若是为了查看每一列回归后的结果，可以调用summary(a)查看，因为你定义的是局部变量；若是要用多列做回归，就不要循环了

呵呵哼哼哈哈 发表于 2015-1-28 20:39
不太清楚楼主的意思，若是为了查看每一列回归后的结果，可以调用summary(a)查看，因为你定义的是局部变量； ...

就是第二列与第一列的回归，第三列与第一列的回归关系，....... 一直到第九列与第一列之间的回归关系

愤怒的小鸟！ 发表于 2015-1-28 20:53
就是第二列与第一列的回归，第三列与第一列的回归关系，....... 一直到第九列与第一列之间的回归关系

summary(a)查看结果，试试

其实每次循环新结果都会覆盖之前结果，所以a只储存了最后一次结果，即z[,1]~z[,n]的回归结果
可以把a定义成list,list的每个元素储存一个回归结果即可
z=matrix(rnorm(100*10),ncol=10)  #generate data
a=list()
for(i in 2:ncol(z)){
    a[[i]]=lm(z[,1]~z[,i])
}

a #查看结果

huyiustc 发表于 2015-1-28 23:17
其实每次循环新结果都会覆盖之前结果，所以a只储存了最后一次结果，即z[,1]~z[,n]的回归结果
可以把a定义成 ...

可以在循环里把a[]换成a[[i-1]]

z=matrix(rnorm(100*10),ncol=10)  #generate data
a=list()
for(i in 2:ncol(z)){
    a[[i-1]]=lm(z[,1]~z[,i])
}

a #查看所有结果

summary(a[[1]])  #查看第一个回归的具体结果

huyiustc 发表于 2015-1-28 23:21
z=matrix(rnorm(100*10),ncol=10)  #generate data
a=list()
for(i in 2:ncol(z)){

谢谢，你成功的解决了我的问题，另外问一句，z[[1]]表示什么意思