OFFSET
1,2
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..100
MATHEMATICA
Table[DivisorSigma[n, n^2], {n, 20}] (* Harvey P. Dale, Sep 04 2024 *)
PROG
(PARI) a(n)=sigma(n^2, n);
(Sage) [sigma(n^2, n)for n in range(1, 14)] # Zerinvary Lajos, Jun 13 2009
(Maxima) makelist(divsum(n^2, n), n, 1, 100); /* Emanuele Munarini, Mar 26 2011 */
CROSSREFS
KEYWORD
nonn
AUTHOR
Jason Earls, Jul 15 2001
STATUS
approved