Alfabetos incluindo uma letra particular
Usando Alphabet e a lista de entidades do tipo "Alphabet", é fácil descobrir quais alfabetos contém uma letra em particular.
Tente saber quais deles contém as letras ø, æ, ñ, or и.
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]=

Obtenha variantes da vogal usando AlphabeticOrder.
In[6]:=

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

Crie uma função para extrair os idiomas que contêm uma letra em particular.
In[7]:=

alphabets = Alphabet /@ alphabetEntities;
getAlphabet[letter_] :=
Pick[alphabetEntities, MemberQ[#, letter] & /@ alphabets];
Mostre as variantes da vogal o e seus alfabetos.
mostre o input completo da Wolfram Language
Out[8]=
