RosettaCodeData/Task/Letter-frequency/MATLAB/letter-frequency.m

8 lines
146 B
Mathematica
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
function u = letter_frequency(t)
2026-04-30 12:34:36 -04:00
if ischar(t)
t = abs(t);
end;
A = sparse(t+1,1,1,256,1);
printf('"%c":%i\n',[find(A)-1,A(A>0)]')
2023-07-01 11:58:00 -04:00
end