OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
For n=4: a(4) = lcm(tau(4), pod(4)) = lcm(3, 8) = 24.
MATHEMATICA
Table[LCM[DivisorSigma[0, n], Times@@Divisors[n]], {n, 50}] (* Harvey P. Dale, Aug 14 2019 *)
PROG
(Magma) [LCM(NumberOfDivisors(n), &*[d: d in Divisors(n)]): n in [1.. 100]]
(PARI) a(n) = my(d=divisors(n)); lcm(vecprod(d), #d); \\ Michel Marcus, Mar 05 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Mar 05 2019
STATUS
approved