Matlabでしりとりを実装する

自動でしりとりを行ってくれるアプリを作製しました。
コピペできるコードは末尾にあります。

完成品

NEXTボタンをクリックするとどんどんしりとりをしていってくれるアプリです。

単語リストの準備

まず、リファレンスとなる単語リストのExcelファイルを作ります。

A列: 単語を入力します。漢字は避けて、ひらがなorカタカナで入力します。
B列: LEFT関数で、A列から先頭の文字を取り出します。
C列: RIGHT関数で、A列から末尾の文字を取り出します。
D,E列: B,C列からテキストをコピペします。
F,G列: PHONETIC関数で、D,E列のひらがな/カタカナをどちらか一方に統一します。
H,I列: VLOOKUP関数で、文字を数字に変換します (K,L列に数字-文字の対応表を作っておきます)。

こうやって自分の好きな単語だけで単語リストを作れば、自分だけのしりとりができるというわけですね。今回は七文字の単語縛りにしました。

実装

・環境：MATLAB R2018a

Matlab GUIを使います。GUIの扱い方は公式ヘルプがとても充実しているのでここで言うほどでもないですが、とりあえず

でGUIを開きます。

以下のようにコンポーネント設置しました。
・エディットテキスト (editPrev): 1つ前の単語が表示されるエリア
・エディットテキスト (editList): 読み込んだ単語リスト名が表示されるエリア
・エディットテキスト (editShiritori): 現在の単語が表示されるエリア
・プッシュボタン (pushbuttonLoad): 単語リストを読み込むボタン
・プッシュボタン (pushbuttonNext): しりとりを実行するボタン

GUIの.figファイルを保存すると自動的にコード (.mファイル) ができます。
2つあるプッシュボタンの部分に処理を入力していきます。

プッシュボタン (pushbuttonLoad)

リファレンスとなる単語リストを読み込み、開始単語を表示するボタンです。
まず、単語リストの選択画面を開きます。

開いたファイル名をテキストボックスに表示します。

しりとりの開始単語をランダムに選びます。
rand関数 (0から1の乱数を1つ生成する) を使って単語をランダムに1つ選びます。単語リストの数 (今回811個あります) とrandを掛けることで0~811の乱数を作り、それをceilで切り上げることで1~811の自然数Nをランダムに1つ作ります。そして、単語リストからN番目の単語を choise 変数に格納します。

prev 構造体に choise 単語を格納します。これは「前の単語」欄に表示されます。prev にはpre, post, choise の3つのフィールドを定義します。
prev.choise 単語そのもの
prev.pre 先頭の文字番号
prev.post 末尾の文字番号

最後に、一番大きいテキストボックスに現在の単語を表示します。
1行目で「TagがeditShiritoriのエディットテキストをhEditShiritoriとして定義する」こととなり、2行目で「choiseをStringとしてhEditShiritoriに表示する」となります。

これでしりとりの準備は完了です。

プッシュボタン (pushbuttonNext)

しりとりを進めていく、メインのボタンです。

「前の単語」欄に1個前の単語を表示します。

次に、単語リストからしりとりが成立する単語をランダムに選びます。
candidates 変数に、先頭の文字が前の単語の末尾と一致する単語リストを格納します。そこから1つをrandsample関数でランダムに選び、xlsread関数で choise 変数に格納します。

そして、選ばれた単語を現在の単語エリアに表示します。

最後に、現在の単語を1個前の単語としてprev構造体に格納しておきます。

これで、無限にしりとりができます！

今後の展望

このままでは同じ単語が2回以上出てしまうので、一度使用した単語 (単語番号) をリスト化して二度と使えないようにしたほうが良いです。さらに、将来的には単語リストから単語を出すのではなく、インターネットから単語を取得・機械学習により許容できる単語化を判断させる、といったしりとりAIを作りたいですね。

「続きをみるには」でコピペできるコードのフルバージョンが読めます。