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

目次へ

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

数 独   20150509 解答のアニメーション

Step by step の解答

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

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

解答のアニメーション

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

「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 にバージョンアップした。表示は改善したが残念ながらクリックしても変化しない。
  • 25 Jul 2015:  表示が正常になった。

目次へ