Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local function findPrimeFactors(...)
- local args = {...};
- local largestnum, num = 0, 0, 0;
- for i, arg in ipairs(args) do
- if(arg > largestnum) then
- largestnum = arg;
- end
- end
- local factors = {};
- local primes = findPrimes(largestnum)
- for i, arg in ipairs(args) do
- factors[arg] = {};
- for _, prime in ipairs(primes) do
- num = arg;
- while(num % prime == 0) do
- factors[arg][prime] = ((factors[arg][prime] == nil and 1) or (factors[arg][prime] + 1));
- num = num / prime;
- end
- end
- end
- for numb, tab in pairs(factors) do
- print("arg:", numb)
- local multi = 1;
- for factor, power in pairs(tab) do
- print("-->", factor .. "^" .. power);
- multi = multi * (factor ^ power);
- end
- print("---->", multi);
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment