|
2, 2, 2, 6, 2, 8, 8, 16, 8, 16, 8, 96, 16, 32, 48, 160, 4, 12, 288, 48, 8, 64, 16, 512, 64, 128, 32, 3072, 64, 128, 1024, 384, 16, 2048, 64, 18432, 32, 128, 192, 512, 768, 64, 1024, 384, 256, 16384, 256, 2560, 64, 192, 1024, 3072, 32, 512, 16384, 4096, 128, 8192, 8192, 768, 4096, 256, 128, 1376256, 16
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
a[0] = 2; a[n_] := DivisorSigma[0, n^n + 1]; Array[a, 45, 0] (* Amiram Eldar, May 31 2021 *)
|
|
PROG
|
(PARI) a(n) = numdiv(n^n+1);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|