MENU
174,649

スレッドNo.1105

面白素数探し

面白素数を探すテーマである数aの後に1が連続して続くものが話題に挙がっていたので
では数aの後に3,7,9が続くタイプについて調べて貰います。

(1)aを3では割れない100までの整数とし
その後に連続して3を並べて行くとき,初めて素数になるものを探す。
a3
a33
a333
a3333
・・・・・
最も3が並ぶaは何?

(2)bを7では割れない100までの整数とし
その後に連続して7を並べて行くとき
b7
b77
b777
b7777
・・・・・
最も7が並ぶbは何?

(3)cを3では割れない100までの整数とし
その後に連続して9を並べて行くとき
c9
c99
c999
c9999
・・・・・
最も9が並ぶcは何?

引用して返信編集・削除(未編集)

(1) a=40 (3が483個)
(2) b=95 (7が2904個)
(3) c=97 (9が90個)

(2)はちょっと時間がかかりました。

引用して返信編集・削除(未編集)

明らかにA112394やA113076でのデータは不足していますね。
(2)bがいくつまで7を並べるといいのかは、自分のプログラムとスペックでは手に入れることはできませんでした。
(862*10^2904-7)/9での素数判定だけでも一夜の時間が必要でした。
可能な限りらすかるさんに補充してもらえると有難いです。

引用して返信編集・削除(編集済: 2023年05月19日 05:31)

それでは、
1234567890123456789012345678901・・・8901
1234567890123456789012345678901・・・567
はどうなんでしょう?素数にはならないのでしょうか?ただし、
1234567890123456789012345678901・・・890123は3の倍数
1234567890123456789012345678901・・・012345は5の倍数
1234567890123456789012345678901・・・456789は3の倍数
です。
(%i32) factor(12345678901234567890123456789012345678901234567890123456789012345678901234567);
(%o32) 7 8447 15511  13460916961858847299449477233189774374173209263392110114539531835993
と結構大きな素数が見つかりました。

引用して返信編集・削除(編集済: 2023年05月19日 15:10)

πは、何億桁も求められていると思います。その一部分を切り出したら、長大な素数になるのではないでしょうか?
また、√2、√3も同じくその一部を切り出したら、長大な素数になるのではないでしょうか?

小数点を頭とし、頭から、いくつか行ったところから始めてそこから、何千桁の素数になるとかという発見も可能ではないでしょうか?

そういう話は、ないのでしょうか?

引用して返信編集・削除(未編集)

あります。https://oeis.org/A005042
3,31,314159,31415926535897932384626433832795028841,
これ以上はhttps://oeis.org/A060421を参照のこと
なお
√2==>A115377
√3==>A119344
何でも調査済みです。

引用して返信編集・削除(編集済: 2023年05月20日 06:14)

GAI様、おはようございます。

ありがとうございます、調査中ですか。

そこで、こんなくだらないことを考えました。
πの何億桁を暗号文として見れば、何語かしれませんが、ある文章が発見されるかもしれませんね。
また、πの何億桁をさがすと、小数点を除いた何桁かのπとか、小数点を除いた何桁かの√2とか√3が見つかるかもしれませんね。
あるいは、πの何億桁をさがすと、ほとんどの素数が含まれているかもしれませんね。すると、あなた方は、素数を発生する式を見つけようと奮闘されていると思いますが、それは、πの何桁目にあるという関数なのかもしれませんね。あるいは√3かもしれません。

引用して返信編集・削除(未編集)

> 可能な限りらすかるさんに補充してもらえると有難いです。
「7」だけですが、「可能な限り」調べましたので、長期間かかってしまいました。
(実際はずいぶん前にアップしていたのですが、なかなか登録されませんでした。)
A113076はb-file(LINKSにある、数を羅列したファイル)の桁数制限(最大1000桁)でa(94)までしか追加できませんでしたが、A090464(追加桁数≧0)のb-fileはa(4443)まで拡充し、またA363922(追加桁数>0)のページを新規追加しました。a(4444)が300000を超えることが判明してこれ以上はあまりにも時間がかかりますので、4443までで終了としました。実際は未解決の9個を除き10000まで調査済みです。
判明している最大桁数はa(2174)の94146桁(2174を合わせて94150桁)です。
この後、「1」「3」「9」を順次調査して更新・追加する予定ですが、数ヶ月かかる(かける)と思います。

引用して返信編集・削除(未編集)

2038の後に76206個の
2174の後に94146個の
7が連続して続いている整数が素数だなんて「おったまげ~」です。
こんな判定ができるのは世界広しといえども、らすかるさんの根性と技術力が無ければ誰も見つけられません。
これらを見つける(最初が4443までと,4444なら300000以上が判明する。)のに、どれほどの時間が費やされたのか
想像するだけで恐れ入ります。
何気なくお願いしていたことに、ここまでの結果を出されていることに驚きと感謝しかありません。
お疲れ様でした。

引用して返信編集・削除(未編集)

これを計算するにあたって
・多倍長整数演算ライブラリを新規に作成(今までは多倍長浮動小数点ライブラリしかなかったので整数専用を作り高速化)
・今までの多倍長乗算では面倒で導入していなかったFFT(高速フーリエ変換)を組み込み(1万桁程度までなら不要)
・1千万以下の素数で割り切れるものは予め除外して多倍長演算そのものを極力削減(mod値を順次更新していくだけなので、実際に素数で割る必要はありません)
のように高速化しましたが、それだけでは限界がありますので、さらに
・今回これの計算のために新規に計算専用のPCを3台購入(計算のためだけにPCを買ったのは初めてです)
・各PCでプログラムを10個ずつ走らせて並列処理(計30個; 最近のCPUはマルチコアなので10個程度までは速度を落とさずに実行できます。ただし結構個体差あり)
ここまでやって、a(4444)>300000が判明するまでの時間は約40日でした(もちろん4444だけで)。100000ぐらいまでなら確か1日程度なので、1~4443ではそこまで長くはかかっていません。
現在は603111111…111について探索していますが、もし300000までに見つからなければ来月中旬頃には「1」関連のページが更新できると思います。(もし見つかった場合は次に不明な1244111111…111の計算になりますので、もっと長くかかります。)「3」と「9」は今のところ手つかずです。

引用して返信編集・削除(未編集)

ちょっと話が違いますが、
>1234567890123456789012345678901・・・567
でやってみました。
(%i4) factor(12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o4) 7 22229 58451 91323843166753 1990289443773271 7468005800688525073486113025183942276805679123737127564644625926404936359354114288935222591868553
結構大きな素数が見つかりました。
(%i5) factor(123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o5) 631 5413 133213 19937882851 22511505301 604529370799796892383085706399069630409601290548904107518265435457728186392127157076941192587811013089187039118303
結構大きな素数が見つかりました。
(%i6) factor(1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o6) 24668354456687 50046625213332582312185428362841227475057792866410709644283257782383939219990720166646582114446721658977604048443630200444602932959332314779241
結構大きな素数が見つかりました。
(%i7) factor(12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o7) 7^2 787 39791 244340699 910633689019 36159280989337321377309448741186358341776718452915799331494698971926272005467216114866777090024304770574299681869120301678721329071609179
結構大きな素数が見つかりました。
factor(1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o1) 138780728882459 116440997068804427 76397632003200217489806493381147875115209465514196615784322229565099172143805359444696611232924888005328711450866017803901010900944384286261280751361319919
結構大きな素数が見つかりました。
(%i1) factor(123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o1) 269 63781 7195672238591621160281593683527750936596082568488234488256727202195489709570131695100951573046965543650538789023858761245771750033606847810909797570562433801503993228624111850669430196275662634009703
結構大きな素数が見つかりました。
(%i2) factor(1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o2) 89 127 487 4540348633 566543368152613 322336577746565069 270495681483446667140074768876393257376360696738928608979826433633902212692284874597775695906434267559218977052438054523604201442887500336882812654336340885938636435247
結構大きな素数が見つかりました。
(%i1) factor(123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o1) 8009 29867 341717377749311 979093487643182053 1542601874113179841341127819855964827942526924719304208787550225284300651193155354184766603738308053817122387392606512334721372012409813687783393202126991759536107515603379271597006409742228112983
結構大きな素数が見つかりました。
(%i2) factor(1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567);を素因数分解せよ。
(%o2) 43 28710881165661785790984783230261269020700545506721217341369796152741630778064860752225090726385299770312948581682457648865920183491243181139821992532586850416049382716023542922765144989950933103646256101062300028710881165661785790984783230261269
結構大きな素数が見つかりました。

追加編集済み。

引用して返信編集・削除(編集済: 2023年10月01日 12:02)

このスレッドに返信

ロケットBBS

Page Top