ロト７／来そうな数字をExcelで抽出する方法【その２】

 
 ロト７当てたい？

 Excelで予想数字と本数字２個を抽出

最新のロト７を１００組使い、来そうな本数字を２５個抽出する予想番号と、来そうな本数字２個のペアーを２５個ほど抽出する方法、この２種類の方法を確立する為に、ＭＳエクセルを利用します。

  来そうな本数字２５個を抽出する

まずは、最新のロト７を１００組準備して、本数字と一致するのか判定するＩＦ関数が返す値の分布表を作ります。次にＩＦ関数が返した値をＳＵＭ関数で集計します。この集計した値と対応する本数字をＳＯＲＴ関数を使い、降順で並び直します。以下は、このプロセスが書かれています。

（ロト７・ＭＳエクセル画像）

第0519回に注目しましょう。

【本数字】を判定する為に、セルＦ４から右欄には、次の関数が入ります。

セルＦ５＝IF（$D5＝F$3,1,0）

セルＧ５＝IF（$D5＝G$3,1,0）

↓↓↓

セルＡＰ５＝IF（$D5＝AP$3,1,0）

【集計】にはＳＵＭ関数を使い、各々の本数字１００組を合算していきます。

セルＦ４＝SUM（F5：F718）

セルＧ４＝SUM（G5：G718）

↓↓↓

セルＡＰ４＝SUM（AP5：AP718）

【本数字】のセル範囲と【集計】のセル範囲を縦に並び直します。

基準の番号１には個数１６が格納します。

基準の番号２には個数１６が格納します。

SORT関数を使って、降順で並び替えしましょう。

①＝SORT（AR5：AS41,2,−1）

並び替えの連番３４に個数３１が１番目にきます。

並び替えの連番１８に個数２７が２番目にきます。

従って、以下の図表を参照します。

上図表から読める結果は、以下になります。

上位７個の数字

【ａ、ｂ、ｃ、ｄ、ｅ、ｆ、ｇ】

【34、18、19、04、29、11、28】

中上位７個の数字

【ｈ、ｉ、ｊ、ｋ、ｌ、m、n】

【09、14、15、22、13、20、25】

中下位７個の数字

【ｏ、ｐ、ｑ、ｒ、ｓ、ｔ、ｕ】

【30、12、17、23、36、07】

下位７個の数字

【ｖ、ｗ、ｘ、ｙ、※※、※※、※※】

【08、32、33、26、※※、※※、※※】

例えば、全数購入買いを考えた上位７個の数字を使って、以下の一覧表を作ります。

１２列３４列５列

ａｂ.ほかフリー

ａｃ.ほかフリー

ａｄ.ほかフリー

ａｅ.ほかフリー

ａｆ.ほかフリー

ａｇ.ほかフリー

ｂｃ.ほかフリー

ｂｄ.ほかフリー

ｂｅ.ほかフリー

ｂｆ.ほかフリー

ｂｇ.ほかフリー

ｃｄ.ほかフリー

ｃｅ.ほかフリー

ｃｆ.ほかフリー

ｃｇ.ほかフリー

ｄｅ.ほかフリー

ｄｆ.ほかフリー

ｄｇ.ほかフリー

ｅｆ.ほかフリー

ｅｇ.ほかフリー

ｆｇ.ほかフリー

上記は、１等当選確率が、通常１千万分の１の確率になりますが、全数購入買いであれば、確率は４８万分の１アップするそうです。（出典はYouTuber：seki確率統計channel宝くじ競艇さんの動画配信を参照して下さい。）ロト７の選んだ本数字を７個が、ハマった時に、何かしらが当選するかもしれません。

  来そうな本数字２個のペアーを抽出

例えば、ロト７の本数字【01.07.11.27.30.35.37】を選んだ場合、この数字の中に隠れている本数字２個のペアーを抽出します。

その結果は【01.07】【01.11】【01.27】【01.30】【01.35】【01.37】【07.11】【07.27】【07.30】【07.35】【07.37】【11.27】【11.30】【11.35】【11.37】【27.30】【27.35】【27.37】【30.35】【30.37】【35.37】になりまして、最大２１個を抽出できます。

これをExcelの関数を使い、本数字７個✕１００組から、本数字２個のペアーを極力消去して抽出する方法を閲覧者の皆さまにお教えします。

※CONCAT関数は文字を結合させます。

※結果は指定した本数字を結合させます。

①＝CONCAT（第一本数字,第二本数字）

②＝CONCAT（第一本数字,第三本数字）

③＝CONCAT（第一本数字,第四本数字）

④＝CONCAT（第一本数字,第五本数字）

⑤＝CONCAT（第一本数字,第六本数字）

⑥＝CONCAT（第一本数字,第七本数字）

⑦＝CONCAT（第二本数字,第三本数字）

⑧＝CONCAT（第二本数字,第四本数字）

⑨＝CONCAT（第二本数字,第五本数字）

⑩＝CONCAT（第二本数字,第六本数字）

⑪＝CONCAT（第二本数字,第七本数字）

⑫＝CONCAT（第三本数字,第四本数字）

⑬＝CONCAT（第三本数字,第五本数字）

⑭＝CONCAT（第三本数字,第六本数字）

⑮＝CONCAT（第三本数字,第七本数字）

⑯＝CONCAT（第四本数字,第五本数字）

⑰＝CONCAT（第四本数字,第六本数字）

⑱＝CONCAT（第四本数字,第七本数字）

⑲＝CONCAT（第五本数字,第六本数字）

⑳＝CONCAT（第五本数字,第七本数字）

㉑＝CONCAT（第六本数字,第七本数字）

まずは、①から㉑までの関数書式を横方向に１列に並べて書き連ねて行きます。そして、下方に向けて「コピー（関数のみ）」します。その結果は次の図表になります。例えば、01.07は17になり、07.11は711になり、27.30は2730になります。

※UNIQUE関数で重複数字があるか検査します。対象のセル範囲は行であるので２番目の引数はTRUEになり、一意の値を取りたいので３番目の引数は０になります。

※UNIQUE関数は、microsoft 365、及び、Excel2021のバージョンから準備されているそうですので、下位バージョンにはありません、あしからず。

⑯＝UNIQUE（$BO5：$BX5.TRUE.0）

次に、新しい作業領域（横方向にセル２１個用意します）を確保した上で、⑯に代入したUNIQUE関数を下方に向けて「コピー（関数のみ）」していきます。すると重複した本数字２個のペアーを検査してくれます。その結果は次の図表になります。

次に、【1 】→【3637】までの数字を【③COUNTIF関数の連番】欄に、連続データーでフィル・コピーしながらを縦に並べます。

その右隣【③COUNTIF関数の個数】は、COUNTIF関数を使って、絶対参照でセル範囲を指定して、下方へ「コピー（関数のみ）」するだけで、【1 】→【3637】までの個数を洗い出してくれます。

⑰＝COUNTIF（$CR$5：$DL$104,$DN5）

次に、SORT関数を使って、【1 】→【3637】までの個数【④SORT関数の個数】を降順に並べて、来そうな本数字２個のペアー【④SORT関数の番号】の洗い出しをします。

⑱＝SORT（DN5：DO3641,2,−1）

最後に、目視で、来そうな本数字２個のペアーを書き出した２５個を発表します。

この結果は以下の一覧表を参照して下さい。

①１１．１８（10個）　⑭０４．１１（７個）

②１５．２２（10個）　⑮０４．１４（７個）

③２７．３４（10個）　⑯０４．２６（７個）

④２０．３４（９個）　⑰０７．１８（７個）

⑤２８．３４（９個）　⑱１０．１８（７個）

⑥０３．３５（８個）　⑲１１．１２（７個）

⑦１２．２５（８個）　⑳１１．２３（７個）

⑧１２．３４（８個）　㉑１４．３４（７個）

⑨１８．２０（８個）　㉒１７．３４（７個）

⑩１９．３２（８個）　㉓１８．２５（７個）

⑪２２．３４（８個）　㉔２０．２９（７個）

⑫２９．３４（８個）　㉕２３．３４（７個）

⑬３０．３４（８個）　㉖９９．９９（０個）

これで、とりあえず、完成です。

  最後に予想数字と２桁数字を考察

来そうな数字を２５個ほど選んだ予想数字と、来そうな本数字２個のペアーを２５個ほど抽出して、それぞれを加味した上で、閲覧者の方々で、再度、本数字を選択すれば、面白いと思います。

ちなみに、ＭＳエクセルを利用する点は、手を抜いて楽をする為でもありますし、ただ、本数字のデーター入力の手間が付き添いますが、このアイディアで「ExcelVBA」は不要になりました。

ＭＳエクセルに精通していれば、誰でも挑戦できますよ！　ちなみに、筆者はこれが精一杯ですが。

以上