Rで解析:休憩にならない?number placeを作成「sudokuAlt」パッケージ

Rの解析に役に立つ記事
スポンサーリンク

中毒性が高い「number place」を作成できる「sudokuAlt」パッケージを紹介します。なお、ゲームサイズが大きくなるほど、作成にパソコンの処理能力が求められます。

パッケージのバージョンは0.2.1。R version 4.2.2でコマンドを確認しています。

スポンサーリンク

パッケージのインストール

下記コマンドを実行してください。

#パッケージのインストール
install.packages("sudokuAlt")

実行コマンド

詳細はコメント、パッケージヘルプを確認してください。

#パッケージの読み込み
library("sudokuAlt")

#http://www.sudoku.com.au/からゲームを取得:fetchAUGameコマンド
#dayオプション:ゲームを取得する日を取得
#difficultyオプション:"easy", "medium", "hard", "tough"が指定可能
FAUGame <- fetchAUGame(1, "tough")
#&#12466;&#12540;&#12512;&#12434;&#38283;&#22987;
plot(originalGame(FAUGame))
#&#22238;&#31572;&#12434;&#34920;&#31034;
plot(solve(FAUGame))

#&#12466;&#12540;&#12512;&#12434;&#20316;&#25104;:makeGame&#12467;&#12510;&#12531;&#12489;
#n&#12458;&#12503;&#12471;&#12519;&#12531;:&#12466;&#12540;&#12512;&#12469;&#12452;&#12474;&#12434;&#25351;&#23450;,&#21021;&#26399;&#20516;&#12399;3
MGame <- makeGame(n = 3)
#&#12466;&#12540;&#12512;&#12398;&#35336;&#31639;,&#12466;&#12540;&#12512;&#12469;&#12452;&#12474;&#12364;&#22823;&#12365;&#12356;&#12411;&#12393;&#35336;&#31639;&#12395;&#26178;&#38291;&#12364;&#12363;&#12363;&#12426;&#12414;&#12377;
MGame <- solve(MGame)
#&#12466;&#12540;&#12512;&#12434;&#38283;&#22987;
plot(originalGame(MGame))
#&#22238;&#31572;&#12434;&#34920;&#31034;
plot(solve(MGame))

出力例

fetchAUGameコマンドの例です。

・ゲームを開始

numberplace

・回答を表示

numberplace2

少しでも、あなたのウェブや実験の解析が楽になりますように!!

タイトルとURLをコピーしました