“R生产中的简单循环”；替换长度为“零”；在R

我是R方面的新手，所以在C和Python中似乎运行良好的东西在R中出人意料地出现了故障。 我试图计算前1000个斐波那契数的乘积。以下是完整的代码：

#PRRODUCT OF FIBONACCI NUMBERS
Fibonacci<-rep(0, 1000)
Fibonacci[0]<-1
Fibonacci[1]<-1
Product<-1

for (i in 2:1000)
{
    Fibonacci[i]<-(Fibonacci[i-1])+(Fibonacci[i-2])
    Product<-Fibonacci[i]*Product
}

Fibonacci[1000]
Product

斐波那契数的乘积

---

R中的Fibonacci数组是基于1的

Fibonacci[1]<-1
Fibonacci[2]<-1
Product<-1
for (i in 3:1000)
{

---

一种简单的调试技术是在循环的开头插入

print（i）

。这会告诉你错误发生的地方，这样你就可以找出问题所在。我也遇到过类似的问题，接受了你的建议，它不起作用，因为我们得到了错误，所以没有print（）发生。就是这样；我从1开始，一切都很顺利。谢谢！尽管第1000个斐波那契数是4.3*10^208，并且前1000个的乘积显示为“无穷大”。我想这方面没什么可做的，不过……谢谢！我不知道！我花了两个小时思考一个类似的问题，直到我最终在谷歌上找到了这个问题。巨大的帮助。

Fibonacci[1]<-1
Fibonacci[2]<-1
Product<-1
for (i in 3:1000)
{

Fibonacci[i]<-(Fibonacci[i-1])+(Fibonacci[i-2])