OFFSET
0,4
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..148
Eric Weisstein's World of Mathematics, Sierpinski Number of the First Kind.
MATHEMATICA
a[0] = 1; a[n_] := PrimeNu[n^n + 1]; Array[a, 45, 0] (* Amiram Eldar, May 31 2021 *)
PROG
(PARI) a(n) = omega(n^n+1);
(Magma) [#PrimeDivisors(n^n+1): n in [0..100]];
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, May 31 2021
EXTENSIONS
a(67)-a(79) from Jon E. Schoenfield, May 31 2021
a(80)-a(100) from Seiichi Manyama, May 31 2021
STATUS
approved