Lettres dans un texte
Le japonais utilise trois systèmes d'écriture différents.
In[1]:=

Entity["Language", "Japanese"]["WritingScripts"]
Out[1]=

Voici les caractères hiragana.
In[2]:=

hiraganaCharacters =
Alphabet[Entity["WritingScript", "Hiragana::jx343"]]
Out[2]=

Mettez en surbrillance les caractères hiragana dans le texte japonais suivant.
In[3]:=

text = "汚れつちまつた悲しみに
今日も小雪の降りかかる
汚れつちまつた悲しみに
今日も風さへ吹きすぎる
汚れつちまつた悲しみは
たとへば狐の革裘
汚れつちまつた悲しみは
小雪のかかつてちぢこまる
汚れつちまつた悲しみは
なにのぞむなくねがふなく
汚れつちまつた悲しみは
倦怠のうちに死を夢む
汚れつちまつた悲しみに
いたいたしくも怖気づき
汚れつちまつた悲しみに
なすところもなく日は暮れ\[Ellipsis]\[Ellipsis]";
Afficher l'entrée complète de Wolfram Language
Out[4]=

Utilisez WordCloud pour montrer la fréquence relative des caractères de l'hiragana dans le texte.
In[5]:=

WordCloud[
StringCases[text,
x_ /; MatchQ[RemoveDiacritics[x],
Alternatives @@ hiraganaCharacters]]]
Out[5]=
