含有特定字母的字母表: Wolfram语言 11 的新功能

含有特定字母的字母表

使用 Alphabet 和 "Alphabet" 类型实体列表，可以简单找出哪个字母表含有特定字母.

尝试找出哪个含有字母 ø、æ、ñ 或 и.

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

使用 AlphabeticOrder 获取元音 o 的变种.

In[6]:=

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

Out[6]=

构建函数提取含有特定字母的语种.

In[7]:=

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

显示 o 元音变种和其字母表.

显示完整的 Wolfram 语言输入

In[8]:=

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

Out[8]=