A062727 Sum of the divisors of n^n (A000312).

1, 1, 7, 40, 511, 3906, 138811, 960800, 33554431, 581130733, 24987792457, 313842837672, 26748283770391, 328114698808274, 25927224666044919, 821051025385244160, 36893488147419103231, 878942778254232811938

Offset: 0

Author

Jason Earls, Jul 11 2001

Keywords

• nonn

Links

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

Crossrefs

Cf. A000312.

Programs

Mathematica

Table[DivisorSigma[1,n^n],{n,1,5!}] (* Vladimir Joseph Stephan Orlovsky, Feb 26 2009 *)

PARI

for(n=0,22,print(sigma(n^n)))

PARI

{ for (n=0, 100, write("b062727.txt", n, " ", sigma(n^n)) ) } \\ Harry J. Smith, Aug 09 2009

Formula

a(n) = A000203(A000312(n)). - Michel Marcus, Jan 10 2015