Q&A
フィボナッチ数列の a^n / a^n-1 が1.618に収束するというグラフを作りたいのですが、途中でエラーが出てしまいます。
for(ii in 3:200){
a[ii] <- a[ii-1] + a[ii-2]
y[ii] <- a[ii] / a[ii-1]
}
エラー: オブジェクト 'y' がありません
授業でplot(y)とやったら、グラフが出てきたと思うのですが、そこまでいけません、、、
回答1件
2
ベストアンサー
予め、ベクタ y を作成しておく必要があります。
r
1N <- 200 2a <- integer(N) 3y <- integer(N) 4 5a[1] <- 0 6a[2] <- 1 7 8for(ii in 3:N){ 9 a[ii] <- a[ii-1] + a[ii-2] 10 y[ii] <- a[ii] / a[ii-1] 11}
投稿2022/11/14 14:53
総合スコア17081
下記のような回答は推奨されていません。
このような回答には修正を依頼しましょう。