Wolfram Language™

Alphabete mit einem bestimmten Buchstaben

Mit Alphabet und der Liste von Entitäten des Typs "Alphabet" ist es ein Leichtes, herauszufinden, welche Alphabete einen bestimmten Buchtsaben enthalten.

Versuchen Sie herauszufinden, welche die Buchstaben ø, æ, ñ oder и enthalten.

In[1]:=

alphabetEntities = EntityList["Alphabet"];

In[2]:=

Select[alphabetEntities, MemberQ[Alphabet[#], "ø"] &]

Out[2]=

In[3]:=

Select[alphabetEntities, MemberQ[Alphabet[#], "æ"] &]

Out[3]=

In[4]:=

Select[alphabetEntities, MemberQ[Alphabet[#], "ñ"] &]

Out[4]=

In[5]:=

Select[alphabetEntities, MemberQ[Alphabet[#], "и"] &]

Out[5]=

Ermitteln Sie Varianten des Vokals o mithilfe von AlphabeticOrder.

In[6]:=

lettersO = Select[CharacterRange[1, 65535], AlphabeticOrder["o", #, IgnoreDiacritics -> True, IgnoreCase -> False] == 0 &]

Out[6]=

Erstellen Sie eine Funktion, um zu extrahieren, welche Sprachen einen bestimmten Buchstaben enthalten.

In[7]:=

alphabets = Alphabet /@ alphabetEntities; getAlphabet[letter_] := Pick[alphabetEntities, MemberQ[#, letter] & /@ alphabets];

Zeigen Sie die Varianten des o-Vokals und ihre Alphabete an.

In[8]:=

TextGrid[DeleteCases[{#, Row@getAlphabet[#]} & /@ Rest[lettersO] , {_, Row@{}}], Frame -> All, Alignment -> {Left, Center}]

Out[8]=