第１７講　末項確定法（魔方陣作成マクロVer.3）への挑戦

第１話　末項確定法とは？

−−−以下VC++講義より引用−−−

今回はいつもと手法を変えて、
最初に、今回の成果を最初に紹介した後に、
末項確定法とは何か説明しましょう。
以下のデータは各次魔方陣を１００個作るのにかかった時間です。

１個あたり０．０１５９１２秒です。
前話のデータが０．０７２８４秒ですから、約４．６倍のスピード差です。
さらに、10次魔方陣の場合

1個あたり０．３９８８９２秒ですから、約５．６倍です。
今までソフトがバージョンアップする度に、
１万倍とか１１００万倍とかとう桁外れの性能アップを見せていたのに比べるとかなり地味に見えるかもしれませんが、
結構大きな戦果だと思います。
プログラミングの世界では、１．１倍でも大きな成果です。
（例えば、数独問題作成ソフトのスピードを１．１倍にするのに私は数日も場合によっては数週間費やしていました。
皆さんからすれば結果だけ見ているので、その苦労は見えないと思いますが、
プログラミングとは地味な研究の積み重ねなのです。
ただ、前々話で紹介したようにときには驚愕の成果を見せることもあります。）
ですから５，６倍はかなり大きな成果です。
さらに、今回の改良によって１１次魔方陣も１個あたり約０．０５６秒でできています。
前話のときは途中で実験を打ち切ってしまったので、単純比較はできませんが、
２０秒まで探索範囲を広げて、６０分も実験を続けましたが最適乱数系列を発見できませんでしたので、
仮に前話のソフトが２０秒であると前提しても、
２０÷０．０５６＝約３６０倍です。
−−−以上VC++講義より引用−−−

上の例は、VC++版の場合ですが、VBA版でもかなりの高速化が期待できます。
ただし、VC++版では一般種法を先にやってから、末項確定法を適用しています。
一般種法をまだ適応していないVBA版では、６次を１個あたり０．０１５９１２秒で作ることが出来ません。
しかし、末項確定法の後、一般種法を組み合わせます。
すると同程度の性能を実現できます。


−−−以下VC++講義より若干内容を変更して引用−−−

末講確定法とは、水色以外のセルについては、初めから入る数字は確定していることに、
着眼した方法です。
例えば、

と来たときに、青のセルに入る数字は決まっています。

（表を見るときには、セルに入っている数字がセル番号のｇかそのセルに実際に入っている数字かを常に区別してください。
上表の数字は、セル番号ｇではなく、そのセルに入っている実際の数字です。
本講義においては、セル番号ｇのときは基本的にはピンクとしています。）
１＋１２＋２９＋３９＋４７＋６０＋７２＋８６＋９３＝４３９
対角線の合計は、
（１＋２＋３＋・・・＋１００）÷１０＝｛１００×（１＋１００）÷２｝÷１０＝５０５
ですから、

に入る数字は
５０５−４３９＝６６
と確定してしまうのです。


ですから、このセルについてはfor文で探索するのは無駄です。

に来たら、for文は通らないで次の世界（ｇ＋１）に進むか、
前の世界（ｇ−１）に戻るしかないのです。
戻る場合の言うのは、例えば

なら、１＋１０＋１９＋２８＋３１＋３８＋５２＋６６＋７２＝３１７ですが、
合計の４５との差をとると、５０５−３１７＝１８８

にはいる最大数は１００ですから、
このセルのある対角線の合計を５０５にするのは不可能になっているわけです。
この場合には1つ前のセル

に戻ってやり直すしかありません。



あるいは

の場合も１６＋２３＋３６＋４６＋５７＋６９＋８０＋８７＋９５＝５０９となり、

に入る数字が−４となってしまいこれも禁則に反します。
セルに入る数字は０から９までですから。
この場合にも

に戻ってやり直すしかありません。

−−−以上VC++講義より若干内容を変えて引用−−−

つまり、末項確定法とは最後の空欄は値が決まっていることに注目した方法です。
末＝最後は確定しているので、末項確定法です。
魔方陣の研究においては、残確定法と名付けていましたが、
VC++講義から名称を変更しています。
さて、皆さんVer.2のコードを改良しましょう。



第16講第１０話へ　第２話へ

　　

VBA講義第１部へ
vc++講義へ
vb講義へ
ＶＢ講義基礎へ
初心者のための世界で一番わかりやすいVisual C++入門基礎講座へ
初心者のための世界で一番わかりやすいVisual Basic入門基礎講座へ

数学研究室に戻る