読者です 読者をやめる 読者になる 読者になる

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

目次へ

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

数 独 20150530

Step by step の解答

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

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

解答のアニメーション

プラスをクリックして数字を増やすと各ステップの答えがわかります。答えになる理由を調べたいとき why をクリックすると分かります。

「Get the Wolfram CDF Player 」が表示される場合は、 CDF プラグインがサポートされていないことを意味します。興味のある人は Wolfram CDF をブログに載せる を見てください。

CloudDeploy を使って

次をクリックしてポップアップメニュー( ii )をクリックし数を増やすとステップごとの答えが分かります。

CloudCDF を使っての表示

"Get the Wolfram CDF Player" が表示された場合、次をクリックするとアニメーションを見ることができます。

Wolfram Cloud の状況

  • 1月17日2015: このころから Wolfram Cloud の表示が変化した。 Popup menu は働いているが表示される数字が変化しない。
  • 2月8日2015: found が $CellContext`found に、why が $CellContext`why に表示される。メモしながら数字を選択すれば Sudoku は正しく描かれる。
  • 4月4日2015: Mathematica 10.1.0 にバージョンアップした。表示は改善したが残念ながらクリックしても変化しない。
  • Jul 25, 2015:  表示が正常になった。

目次へ