Classificando cidades e construindo um dicionário

Na versão 11, é possível classificar cadeia de caracteres usando um método de comparação alfabético definido para cada idioma.

Por exemplo, pegue um grupo de cidades da Dinamarca.

In[1]:=

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

Agora, classifique essas cidades usando AlphabeticSort mas definindo os idiomas separadamente em dinamarquês e inglês para ver as diferenças entre eles.

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]=

Crie um dicionário traduzindo uma amostra aleatória de palavras de Sueco para Inglês.

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]=