R语言 积分问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

望求教积分相关问题。我想要求函数G的积分，积分结果报错是什么原因？

（其中n=15;y（j）表示y按照大小排序，即代码中的YO;yita=1或0是一个示性函数）

G<-function(y){
  f=1
  for(i in 1:15){
    if(YO[i,2]<=y && YO[i,3]==1){
      f=f*((15-i)/(15-i+1))
  return(1-f)  }
  }
}

> integrate (G,0,0.1)
Error in integrate(G, 0, 0.1) :
  evaluation of function gave a result of wrong length

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：R语言 是什么原因 积分 R语言

1、您确认函数G是正确的吗？看了半天，没看出来G的参数y与integrate()的lower和upper两个参数有啥关系。
2、G的本意是在判断YO的条件下，输出离散的结果，但如果不符合条件，好像没有输出，也就是说这应该是个不连续的函数，我试了一下向量化后也不能integrate。

llb_321 发表于 2022-5-18 15:48
1、您确认函数G是正确的吗？看了半天，没看出来G的参数y与integrate()的lower和upper两个参数有啥关系。
...

问题已经解决，感谢！