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]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_33.png)
alphabetEntities = EntityList["Alphabet"];
In[2]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_34.png)
Select[alphabetEntities, MemberQ[Alphabet[#], "ø"] &]
Out[2]=
![](assets.pt-br/alphabets-including-a-particular-letter/O_20.png)
In[3]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_35.png)
Select[alphabetEntities, MemberQ[Alphabet[#], "æ"] &]
Out[3]=
![](assets.pt-br/alphabets-including-a-particular-letter/O_21.png)
In[4]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_36.png)
Select[alphabetEntities, MemberQ[Alphabet[#], "ñ"] &]
Out[4]=
![](assets.pt-br/alphabets-including-a-particular-letter/O_22.png)
In[5]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_37.png)
Select[alphabetEntities, MemberQ[Alphabet[#], "и"] &]
Out[5]=
![](assets.pt-br/alphabets-including-a-particular-letter/O_23.png)
Obtenha variantes da vogal usando AlphabeticOrder.
In[6]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_38.png)
lettersO =
Select[CharacterRange[1, 65535],
AlphabeticOrder["o", #, IgnoreDiacritics -> True,
IgnoreCase -> False] == 0 &]
Out[6]=
![](assets.pt-br/alphabets-including-a-particular-letter/O_24.png)
Crie uma função para extrair os idiomas que contêm uma letra em particular.
In[7]:=
![Click for copyable input](assets.pt-br/alphabets-including-a-particular-letter/In_39.png)
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]=
![](assets.pt-br/alphabets-including-a-particular-letter/O_25.png)