OFFSET
1,2
LINKS
FORMULA
Multiplicative with a(p^e) = Product_{k=2..e+1} Phi_k(p), where Phi_k(x) is k-th cyclotomic polynomial.
MATHEMATICA
Table[LCM@@(DivisorSigma[1, #]&/@Divisors[n]), {n, 70}] (* Harvey P. Dale, Feb 22 2023 *)
PROG
(PARI) A069934(n) = my(d = divisors(n)); lcm(vector(#d, k, sigma(d[k]))); \\ Antti Karttunen, Sep 10 2017
CROSSREFS
KEYWORD
mult,nonn
AUTHOR
Vladeta Jovovic, Apr 25 2002
STATUS
approved