From c3ff98ee4aa79bcaa07c8a478e96539c2a512e73 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 14 May 2009 19:51:41 -0500
Subject: rename files for better sorting

---
 005.lua | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 005.lua

(limited to '005.lua')

diff --git a/005.lua b/005.lua
new file mode 100644
index 0000000..b407475
--- /dev/null
+++ b/005.lua
@@ -0,0 +1,21 @@
+local max_factors = {}
+for _, prime in ipairs({2, 3, 5, 7, 11, 13, 17, 19}) do
+    for i = prime, 20, prime do
+        local num_fact = 0
+        local tmp = i
+        while i % prime == 0 do
+            num_fact = num_fact + 1
+            i = i / prime
+        end
+        if num_fact > (max_factors[prime] or 0) then
+            max_factors[prime] = num_fact
+        end
+    end
+end
+
+local total = 1
+for prime, power in pairs(max_factors) do
+    total = total * prime^power
+end
+
+print(total)
-- 
cgit v1.2.3