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

Author

Jason Earls, Jul 15 2001

Keywords

• nonn

Links

• Harry J. Smith, Table of n, a(n) for n = 1..100

Programs

Mathematica

Table[DivisorSigma[n,n^2],{n,20}] (* Harvey P. Dale, Sep 04 2024 *)

Maxima

makelist(divsum(n^2,n),n,1,100); /* Emanuele Munarini, Mar 26 2011 */

PARI

a(n)=sigma(n^2, n);

Sage

[sigma(n^2,n)for n in range(1,14)] # Zerinvary Lajos, Jun 13 2009