From dd7da2c62ae1f53069e5bf07ea92861218da0c41 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sun, 27 Mar 2022 10:53:41 -0700 Subject: helper: count --- break.tlv | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'break.tlv') diff --git a/break.tlv b/break.tlv index 34cbe78..36041e6 100644 --- a/break.tlv +++ b/break.tlv @@ -236,6 +236,7 @@ >end - __teliva_timestamp: original count_letters: + >-- TODO: handle unicode >function count_letters(s) > local result = {} > for i=1,s:len() do @@ -248,6 +249,21 @@ > end > return result >end +- __teliva_timestamp: original + count: + >-- turn an array of elements into a map from elements to their frequency + >-- analogous to count_letters for non-strings + >function count(a) + > local result = {} + > for i, v in ipairs(a) do + > if result[v] == nil then + > result[v] = 1 + > else + > result[v] = result[v] + 1 + > end + > end + > return result + >end - __teliva_timestamp: original union: >function union(a, b) -- cgit 1.4.1-2-gfad0