想编一个小函数，function(w)为什么w是数组时只能返回第一个数？

2556

收藏 2014-06-20

fx<-function(w=c())  {
  xx=0
  for (i in 1:4) {
p<-w[i]*i
xx<-xx+p
return(xx)
  }}
以上为编写的函数，可以正常运行，但是循环只能返回w的第一个值w[1]，
例如当w<-c(0,1,1,1)时，
返回的xx值是0

扫码加我拉你入群

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

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

全部回复

xupengswordsman

2014-6-20 16:45:36

fx<-function(w=c())  {
  xx=0
  for (i in 1:4) {
p<-w[i]*i
xx<-xx+p
  }
return(xx)
}

扫码加我拉你入群

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

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

iiooiookoo

2014-6-20 16:51:14

把return改成print?

扫码加我拉你入群

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

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

statical

2014-6-20 17:21:43

iiooiookoo 发表于 2014-6-20 16:51
把return改成print?

改为print后输出的是一个向量，有四个数，最后一个数是我想要的和。但是怎么输出一个值呢？我只想要求和

扫码加我拉你入群

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

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

statical

2014-6-20 17:30:24

xupengswordsman 发表于 2014-6-20 16:45
fx

原来问题出在这感谢！！

扫码加我拉你入群

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

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

beijuoooooo

2014-6-20 17:34:09

fx<-function(w){
   xx=0
   for(i in 1:4){
         p<-w[i]*i
         xx<-xx+p
      }
   xx
   }

扫码加我拉你入群

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

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

点击查看更多内容…

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群