请大家帮我看看哪里有问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

n=1000
p=0.1
k=2
m=0#次数
b=rbinom(n,1,p)
t=ceiling(n/k)
for(i in 0:t-1)
{
  s=0
  for(j in 1:k)
  {
    s=s+b[k*i+j]
  }
  if(s==0)
    m=m+1
  else
    m=m+k+1
}
m

以上是程序
会报错
Error in if (s == 0) m = m + 1 else m = m + k + 1 :
  argument is of length zero

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：哪里有 argument ceiling length rbinom r语言

在手机上看了下，没测试，格式不该是 if 条件 ｛｝吗？你 if 后面的大括号是不是漏了？

for(i in 0:t-1)  改为 for(i in 0:(t-1)) 试试

有没有其他错误没细看，至少有个典型错误0:t-1应该是0:(t-1)