TWC194

2 files changed, 38 insertions, 0 deletions

diff --git a/challenge-194/deadmarshal/lua/ch-1.lua b/challenge-194/deadmarshal/lua/ch-1.lua
new file mode 100644
index 0000000000..67320493e3
--- /dev/null
+++ b/challenge-194/deadmarshal/lua/ch-1.lua
@@ -0,0 +1,19 @@
+local function digital_clock(str)
+  local one,two,three,four = str:match('(.)(.):(.)(.)')
+  if one == '?' then
+    if tonumber(two) < 4 then return 2 else return 1 end
+  elseif two == '?' then
+    if tonumber(one) < 2 then return 9 else return 3 end
+  elseif three == '?' then
+    return 5
+  else return 9
+  end
+end
+
+print(digital_clock('?5:00'))
+print(digital_clock('?3:00'))
+print(digital_clock('1?:00'))
+print(digital_clock('2?:00'))
+print(digital_clock('12:?5'))
+print(digital_clock('12:5?'))
+
diff --git a/challenge-194/deadmarshal/lua/ch-2.lua b/challenge-194/deadmarshal/lua/ch-2.lua
new file mode 100644
index 0000000000..2f4d85d1f4
--- /dev/null
+++ b/challenge-194/deadmarshal/lua/ch-2.lua
@@ -0,0 +1,19 @@
+local function frequency_equalizer(str)
+  local t,vals = {},{}
+  setmetatable(t,{__index = function(t,k) return 0 end})
+  for i=1, #str do
+    local c = str:sub(i,i)
+    t[c] = t[c] + 1
+  end
+  for k,v in pairs(t) do vals[#vals+1] = v end
+  table.sort(vals,function(a,b) return a > b end)
+  if vals[1] == vals[2]+1 and vals[#vals] == vals[2] then
+    return true
+  end
+  return false
+end
+
+print(frequency_equalizer('abbc'))
+print(frequency_equalizer('xyzyyxz'))
+print(frequency_equalizer('xzxz'))
+