- 高校数学の質問スレ Part410
349 ：１３２人目の素数さん[sage]：2021/02/28(日) 23:45:51.92 ID:4XXGbQLR - >>301
f <- function(N){
+ a=numeric()
+ a[1]=0
+ a[2]=0
+ # a[3]=(a[1]-1)%%100
+ # a[4]=(a[2]-1)%%100
+ for(n in 2:N){
+ a[n+1]=(a[n-1]-1)%%100
+ }
+ a[N]
+ }
> f(100)
[1] 51
| - 高校数学の質問スレ Part410
350 ：１３２人目の素数さん[sage]：2021/02/28(日) 23:50:54.21 ID:4XXGbQLR - >>346
ご指摘の通り。出願ミス。
1000万以下の素数の数は664579以下であることを示せの間違い。
|
|