Word frequency: Difference between revisions

Content added Content deleted
Line 2,861: Line 2,861:


=={{header|Mathematica}} / {{header|Wolfram Language}}==
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>Take[WordCounts@Import["https://www.gutenberg.org/files/135/135-0.txt"],10] // Dataset</lang>
<lang Mathematica>TakeLargest[10]@WordCounts[Import["https://www.gutenberg.org/files/135/135-0.txt"], IgnoreCase->True]//Dataset</lang>
{{out}}
{{out}}
<pre>
<pre>
the 36661
the 41088
of 19605
of 19936
and 14070
and 14931
a 13474
a 14536
to 13356
to 13738
in 10259
in 11208
he 9607
was 8545
was 8621
that 7285
that 7825
he 6798
it 6535
had 6140
</pre>
</pre>