OFFSET
0,3
LINKS
Harry J. Smith, Table of n, a(n) for n = 0..100
FORMULA
MATHEMATICA
Table[DivisorSigma[1, n^n], {n, 1, 5!}] (* Vladimir Joseph Stephan Orlovsky, Feb 26 2009 *)
PROG
(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
CROSSREFS
KEYWORD
nonn
AUTHOR
Jason Earls, Jul 11 2001
STATUS
approved