美しい整数の世界 (780レス)
上
下
前
次
1-
新
538
: 2024/04/20(土)23:19
ID:bVNPGaYh(2/5)
AA×
[240|
320
|
480
|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
538: [sage] 2024/04/20(土) 23:19:25.82 ID:bVNPGaYh ■合成数はどうやって取り除く? 奇数の数列1,3,5,7,9,11,13,15,17,19… に対して 数列1,1,0,1,1,0,1,1,0,1,1,0…は a_n=n^2 mod3 数列1,1,1,1,0,1,1,1,1,0,1,1,1,1,0…は a_n=n^4 mod5 これを繰り返してゆくと、 Table[(C(0,n-1))+{(2n-1) {C(0,n-2)+((n+1)^2mod3)} {C(0,n-3)+((n-3)^4mod5)} {C(0,n-4)+((n-4)^6mod7)} {C(0,n-6)+((n-6)^10mod11)} {C(0,n-7)+((n-7)^12mod13)} {C(0,n-9)+((n-9)^16mod17)}},{n,1,180}] {n,1,180}の範囲で精度100%が得られる modの前後の数値を変数aとnで 置き換えると Table[Product[(2n-1)^(C(0,3-a)) C(0,C(0,((n-a)^(2a-2)mod(2a-1)))),{a,3,30}],{n,50,232}] 変数aとnを使うと乗積の計算が入るので 概ね200より大きな素数の判定となる http://rio2016.5ch.net/test/read.cgi/math/1686749616/538
合成数はどうやって取り除く? 奇数の数列 に対して 数列は 数列は これを繰り返してゆくと の範囲で精度が得られる の前後の数値を変数とで 置き換えると 変数とを使うと乗積の計算が入るので 概ねより大きな素数の判定となる
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 242 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.024s