A062755 a(n) = sigma_n(n^2): sum of n-th powers of divisors of n^2.

1, 21, 757, 69905, 9768751, 2214363531, 678223896393, 282578800148737, 150102261281924281, 100097761867442455851, 81402749387125072783933, 79516409977044969123349715, 91733330193268919533506208263

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

Sequence in context: A078791 A201069 A143002 * A012850 A012645 A220069

Adjacent sequences: A062752 A062753 A062754 * A062756 A062757 A062758

Keyword

nonn

Author

Jason Earls, Jul 15 2001

Status

approved