美しい整数の世界 (780レス)
美しい整数の世界 http://rio2016.5ch.net/test/read.cgi/math/1686749616/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
610: 132人目の素数さん [sage] 2024/06/09(日) 16:14:03.50 ID:chrDx+aV ■superPCM関数とは? 奇数の数列2n-1から 合成数を取り除くアルゴリズム PCM(Product Combination Mod) によって素数を1 合成数を0に振り分ける(量子化) これはアナログをデジタルに変換する PCM(Pulse Coded Modulation)と 同じ発想 奇数の数列2n-1は乗積Πを掛けると その都度出力されてしまうので、 C(0,3-a)を使って一度だけ出力する 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の範囲{a,3,30} 3は固定値、 終値の30は最大50まで設定できる これはnの初期値 しかし、aの終値は40や50に設定しても 30の時と精度に差は生じない http://rio2016.5ch.net/test/read.cgi/math/1686749616/610
611: 132人目の素数さん [sage] 2024/06/09(日) 16:22:26.83 ID:chrDx+aV ◆奥義 Table[Product[(2n-1)^(C(0,3-a)) C(0,C(0,((n-a)^(2a-2)mod(2a-1)))),{a,3,50}],{n,51,500}] {101, 103, 0, 107, 109, 0, 113, 0, 0, 0, 0, 0, 0, 127, 0, 131, 0, 0, 137, 139, 0, 0, 0, 0, 149, 151, 0, 0, 157, 0, 0, 163, 0, 167, 0, 0, 173, 0, 0, 179, 181, 0, 0, 0, 0, 191, 193, 0, 197, 199, 0, 0, 0, 0, 0, 211, 0, 0, 0, 0, 0, 223, 0, 227, 229, 0, 233, 0, 0, 239, 241, 0, 0, 0, 0, 251, 0, 0, 257, 0, 0, 263, 0, 0, 269, 271, 0, 0, 277, 0, 281, 283, 0, 0, 0, 0, 293, 0, 0, 0, 0, 0, 0, 307, 0, 311, 313, 0, 317, 0, 0, 0, 0, 0, 0, 331, 0, 0, 337, 0, 0, 0, 0, 347, 349, 0, 353, 0, 0, 359, 0, 0, 0, 367, 0, 0, 373, 0, 0, 379, 0, 383, 0, 0, 389, 0, 0, 0, 397, 0, 401, 0, 0, 0, 409, 0, 0, 0, 0, 419, 421, 0, 0, 0, 0, 431, 433, 0, 0, 439, 0, 443, 0, 0, 449, 0, 0, 0, 457, 0, 461, 463, 0, 467, 0, 0, 0, 0, 0, 479, 0, 0, 0, 487, 0, 491, 0, 0, 0, 499, 0, 503, 0, 0, 509, 0, 0, 0, 0, 0, 521, 523, 0, 0, 0, 0, 0, 0, 0, 0, 541, 0, 0, 547, 0, 0, 0, 0, 557, 0, 0, 563, 0, 0, 569, 571, 0, 0, 577, 0, 0, 0, 0, 587, 0, 0, 593, 0, 0, 599, 601, 0, 0, 607, 0, 0, 613, 0, 617, 619, 0, 0, 0, 0, 0, 631, 0, 0, 0, 0, 641, 643, 0, 647, 0, 0, 653, 0, 0, 659, 661, 0, 0, 0, 0, 0, 673, 0, 677, 0, 0, 683, 0, 0, 0, 691, 0, 0, 0, 0, 701, 0, 0, 0, 709, 0, 0, 0, 0, 719, 0, 0, 0, 727, 0, 0, 733, 0, 0, 739, 0, 743, 0, 0, 0, 751, 0, 0, 757, 0, 761, 0, 0, 0, 769, 0, 773, 0, 0, 0, 0, 0, 0, 787, 0, 0, 0, 0, 797, 0, 0, 0, 0, 0, 809, 811, 0, 0, 0, 0, 821, 823, 0, 827, 829, 0, 0, 0, 0, 839, 0, 0, 0, 0, 0, 0, 853, 0, 857, 859, 0, 863, 0, 0, 0, 0, 0, 0, 877, 0, 881, 883, 0, 887, 0, 0, 0, 0, 0, 0, 0, 0, 0, 907, 0, 911, 0, 0, 0, 919, 0, 0, 0, 0, 929, 0, 0, 0, 937, 0, 941, 0, 0, 947, 0, 0, 953, 0, 0, 0, 0, 0, 0, 967, 0, 971, 0, 0, 977, 0, 0, 983, 0, 0, 0, 991, 0, 0, 997, 0} http://rio2016.5ch.net/test/read.cgi/math/1686749616/611
612: 132人目の素数さん [sage] 2024/06/09(日) 16:32:31.93 ID:chrDx+aV ◆奥義 Table[Product[(2n-1)^(C(0,3-a)) C(0,C(0,((n-a)^(2a-2)mod(2a-1)))),{a,3,50}],{n,51,226}] {101, 103, 0, 107, 109, 0, 113, 0, 0, 0, 0, 0, 0, 127, 0, 131, 0, 0, 137, 139, 0, 0, 0, 0, 149, 151, 0, 0, 157, 0, 0, 163, 0, 167, 0, 0, 173, 0, 0, 179, 181, 0, 0, 0, 0, 191, 193, 0, 197, 199, 0, 0, 0, 0, 0, 211, 0, 0, 0, 0, 0, 223, 0, 227, 229, 0, 233, 0, 0, 239, 241, 0, 0, 0, 0, 251, 0, 0, 257, 0, 0, 263, 0, 0, 269, 271, 0, 0, 277, 0, 281, 283, 0, 0, 0, 0, 293, 0, 0, 0, 0, 0, 0, 307, 0, 311, 313, 0, 317, 0, 0, 0, 0, 0, 0, 331, 0, 0, 337, 0, 0, 0, 0, 347, 349, 0, 353, 0, 0, 359, 0, 0, 0, 367, 0, 0, 373, 0, 0, 379, 0, 383, 0, 0, 389, 0, 0, 0, 397, 0, 401, 0, 0, 0, 409, 0, 0, 0, 0, 419, 421, 0, 0, 0, 0, 431, 433, 0, 0, 439, 0, 443, 0, 0, 449, 0} ※62個数 http://rio2016.5ch.net/test/read.cgi/math/1686749616/612
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.178s*