Wolfram Language™

Classez des villes et créez un dictionnaire

Dans la version 11, il est possible de classer des chaînes de caractères en utilisant une méthode de comparaison alphabétique définie pour chaque langue.

Par exemple, obtenez un groupe de villes du Danemark.

In[1]:=

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

Triez maintenant ces villes en utilisant AlphabeticSort mais en réglant les langues séparément sur le danois et l'anglais, afin de pouvoir apprécier les différences entre elles.

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

Créez un dictionnaire traduisant un échantillon aléatoire de mots du suédois à l'anglais.

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