Letter frequency: Difference between revisions
Content deleted Content added
No edit summary |
Added Pike implementation |
||
Line 2,400: | Line 2,400: | ||
{{out}} |
{{out}} |
||
<pre>-> (("^J" . 2) ("a" . 1) ("b" . 1) ("c" . 2) ("d" . 2) ("e" . 1) ("f" . 1))</pre> |
<pre>-> (("^J" . 2) ("a" . 1) ("b" . 1) ("c" . 2) ("d" . 2) ("e" . 1) ("f" . 1))</pre> |
||
=={{header|Pike}}== |
|||
<lang Pike> |
|||
string all = Stdio.read_file("README.md"); |
|||
mapping res = ([]); |
|||
foreach(all/1, string char) |
|||
res[char]++; |
|||
write("%O\n", res); |
|||
</lang> |
|||
{{Out}} |
|||
<pre> |
|||
([ /* 26 elements */ |
|||
"\n": 2, |
|||
" ": 12, |
|||
".": 2, |
|||
"/": 3, |
|||
":": 1, |
|||
"P": 1, |
|||
"T": 1, |
|||
"a": 5, |
|||
"c": 1, |
|||
"d": 2, |
|||
"e": 10, |
|||
"f": 3, |
|||
"g": 1, |
|||
"h": 2, |
|||
"i": 5, |
|||
"k": 1, |
|||
"l": 4, |
|||
"m": 3, |
|||
"n": 1, |
|||
"o": 7, |
|||
"p": 4, |
|||
"r": 4, |
|||
"s": 10, |
|||
"t": 5, |
|||
"u": 2, |
|||
"x": 2 |
|||
]) |
|||
</pre> |
|||
=={{header|PL/I}}== |
=={{header|PL/I}}== |