Add frequencies to core library.

2026-09-14 21:31:20 +00:00 · 2018-06-03 14:21:24 -04:00
parent 63baa52392
commit 6d1ab414e4
2 changed files with 10 additions and 11 deletions
@@ -1,11 +0,0 @@
-# Get the number of occurences of elements in a set
-
-(defn frequencies
- "Get the number of occurences of each value in a indexed structure."
- [ind]
- (def freqs @{})
- (loop 
-   [x :in ind]
-   (def n (get freqs x))
-   (put freqs x (if n (+ 1 n) 1)))
- freqs)