英単語の頻度分布を求める
アメリカ合衆国憲法中の単語の出現数を数える.
In[1]:=
![Click for copyable input](assets.ja/find-the-distribution-of-english-words-frequency/In_21.png)
text = ExampleData[{"Text", "USConstitution"}, "Words"];
wordCount = Values[Counts[text]];
単語の出現数の単純な分布を求める.
In[2]:=
![Click for copyable input](assets.ja/find-the-distribution-of-english-words-frequency/In_22.png)
e\[ScriptCapitalD] = FindDistribution[wordCount]
Out[2]=
![](assets.ja/find-the-distribution-of-english-words-frequency/O_15.png)
求められた分布と単語数を比較する.
完全なWolfram言語入力を表示する
Out[3]=
![](assets.ja/find-the-distribution-of-english-words-frequency/O_16.png)