Averages/Mode: Difference between revisions

m
(added Arturo)
Line 274:
k: to :string i
if not? key? freqs k -> set freqs k 0
set freqs \[k]: (freqs \ [k]) + 1
]
maximum: max values freqs
select keys freqs 'i -> maximum = freqs \ [i]
]
1,532

edits