OFFSET
1,2
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..10000
MATHEMATICA
Table[LCM[Length[Divisors[n]], DivisorSigma[1, n]], {n, 1, 100}] (* Stefan Steinerberger, Apr 13 2006 *)
PROG
(PARI) A009278(n) = lcm(numdiv(n), sigma(n)); \\ Antti Karttunen, Sep 10 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved