数独(Sudoku) を Mathematicaで解く: 数独-20150328-日経

目次へ

2015年3月28日(土) 付け日経新聞ナンバープレースの問題を Mathematica で解いた。

数 独 20150328

Step by step の解答

このパズルの特徴は Naked Singles(裸のシングル) と Hidden Single(隠れたシングル)のみで答えが求まることです。

この表の1番目の手順が意味することは、Naked Single(裸のシングル)を探した結果、2行6列に1を、4行6列に3を、6行4列に8を、8行4列に5を入れる。以下同様にして 14回の手順を経て完成に至ります。

解答のアニメーション

ポップアップメニュー( ii )をタップして数字を増やすと各ステップの答えがわかります。

「Get the Wolfram CDF Player 」が表示される場合は、 CDF プラグインがサポートされていないことを意味します。デスクトップ版はあるのでこのようなメッセージが現れる。

CloudDeploy

次をクリックしてポップアップメニュー( ii )をクリックし数を増やすとステップごとの答えが分かります。次の手順で実行すると正しく動きます。

sudoku-20150321-why ( Wolfram Cloud )

CloudCDF を使っての表示

"Get the Wolfram CDF Player" が表示された場合、次をクリックするとアニメーションを見ることができます。1. $CellContext`why (右)を選択し、2. ポップアップメニュー( ii )をタップして数字を選んでください。

sudoku-20150328-CloudCDF

備考

漸くにして CDF をここに載せることができるようになった。詳しい説明は次にあります。

Wolfram Cloud の状況

  • 残念ながら、1月17日ころから Wolfram Cloud の表示が変化した。
  • Popup menu は働いているが表示される数字が変化しない。
  • 8 Feb 2015: found が $CellContext`found に、why が $CellContext`why に表示されている。
  • 25 Jul 2015:  Sudoku は正しく描かれます。

目次へ