Wolfram言語™

都市を分類して辞書を編纂する

バージョン11では，各言語に対して定義されたアルファベット比較法を使って文字列がソートできる．

例として，デンマークの諸都市を取得する．

In[1]:=

cityNames = EntityValue[ GeoEntities[ Entity["AdministrativeDivision", {"Nordjylland", "Denmark"}], "City"], "Name"];

次に，言語をデンマーク語に設定した場合と英語に設定した場合との違いが見られるようにして，AlphabeticSortを使って都市をソートする．

In[2]:=

sortedCityNames = Transpose[{AlphabeticSort[cityNames, "Danish"], AlphabeticSort[cityNames, "English"]}];

In[3]:=

TextGrid[Join[ Sequence @@ (Prepend[#, {"Danish", "English"}] & /@ Partition[sortedCityNames, UpTo[14]]), 2], Frame -> {None, None, {{{1, 1}, {1, 6}} -> True, {{1, 15}, {1, 6}} -> True, {{1, 15}, {1, 2}} -> True, {{1, 15}, {1, 4}} -> True}}]

Out[3]=

ランダムサンプルをスウェーデン語から英語に翻訳して，ソートされた辞書を作る．

In[4]:=

words = AlphabeticSort[ RandomSample[WordList[Language -> "Swedish"], 6], "Swedish"];

In[5]:=

sortedTranslations = AlphabeticSort[#, "English"] & /@ WordTranslation[words, "Swedish" -> "English"];

In[6]:=

TextGrid[{words, Column /@ sortedTranslations}, Frame -> All]

Out[6]=