From 1f0aac7d81b1b1ce7b0c9b07388996a64bff10ed Mon Sep 17 00:00:00 2001
From: chirvasitua <chirvasitua@gmail.com>
Date: Thu, 15 Jul 2021 16:57:36 -0400
Subject: 1st commit on 073_lua

---
 challenge-073/stuart-little/lua/ch-1.lua | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100755 challenge-073/stuart-little/lua/ch-1.lua

(limited to 'challenge-073/stuart-little/lua/ch-1.lua')

diff --git a/challenge-073/stuart-little/lua/ch-1.lua b/challenge-073/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..452c6f73c0
--- /dev/null
+++ b/challenge-073/stuart-little/lua/ch-1.lua
@@ -0,0 +1,21 @@
+#!/usr/bin/env lua
+
+-- run <script> <space-separated numbers, with the window size first>
+
+function slide(fn,t,k)
+   local out={}
+   for i=1,#t-k+1 do
+      table.insert(out,fn(table.unpack(t,i,i+k-1)))
+   end
+   return out
+end
+
+function map(fn,t)
+   local out={}
+   for _,v in ipairs(t) do
+      table.insert(out,fn(v))
+   end
+   return out
+end
+
+print(table.unpack(slide(math.min,map(tonumber,table.pack(table.unpack(arg,2))),tonumber(arg[1]))))
-- 
cgit