From c922378a3971e2cc4db090a618cdbaf497a00a2a Mon Sep 17 00:00:00 2001
From: Tyler Wardhaugh <tyler.wardhaugh@gmail.com>
Date: Thu, 5 Nov 2020 14:51:44 -0800
Subject: Ch85 (Lua): Task 2

---
 challenge-085/tyler-wardhaugh/lua/ch-2.lua | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100755 challenge-085/tyler-wardhaugh/lua/ch-2.lua

(limited to 'challenge-085/tyler-wardhaugh/lua/ch-2.lua')

diff --git a/challenge-085/tyler-wardhaugh/lua/ch-2.lua b/challenge-085/tyler-wardhaugh/lua/ch-2.lua
new file mode 100755
index 0000000000..6af287ab8d
--- /dev/null
+++ b/challenge-085/tyler-wardhaugh/lua/ch-2.lua
@@ -0,0 +1,22 @@
+#!/usr/bin/env lua
+
+local t2 = {}
+
+function t2.has_power_expr(n)
+  local endpoint = function(x) return 1 + math.floor(math.log(n, x)) end
+  for a = 2,endpoint(2) do
+    for b = 2,endpoint(a) do
+      if n == a ^ b then
+        return 1
+      end
+    end
+  end
+
+  return 0
+end
+
+function t2.run(args)
+  print(t2.has_power_expr(tonumber(args[1])))
+end
+
+return t2
-- 
cgit