OFFSET
1,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..100
MAPLE
a:= n-> mul(n!*i[2]+1, i=ifactors(n)[2]):
seq (a(n), n=1..20); # Alois P. Heinz, Dec 17 2011
PROG
(PARI) for(n=1, 13, print(numdiv(n^(n!))))
CROSSREFS
KEYWORD
nonn
AUTHOR
Jason Earls, Jul 22 2001
EXTENSIONS
More terms from Henry Bottomley, Jul 24 2001
More terms from Alois P. Heinz, Dec 17 2011
STATUS
approved