OFFSET
1,1
COMMENTS
a(n) >= A309906(7) = 8 for n > 3.
EXAMPLE
p = factorization
n prime(n) p^7 - 1 of p^7 - 1 a(n)
- -------- ---------- --------------------- ----
1 2 127 127 2
2 3 2186 2 * 1093 4
3 5 78124 2^2 * 19531 6
4 7 823542 2 * 3 * 29 * 4733 16
5 11 19487170 2 * 5 * 43 * 45319 16
6 13 62748516 2^2 * 3 * 5229043 12
7 17 410338672 2^4 * 25646167 10
8 19 893871738 2 * 3^2 * 701 * 70841 24
9 23 3404825446 2 * 11 * 29 * 5336717 16
MATHEMATICA
a[n_] := DivisorSigma[0, Prime[n]^7 - 1]; Array[a, 50] (* Amiram Eldar, Feb 27 2021 *)
PROG
(PARI) a(n) = numdiv(prime(n)^7-1); \\ Michel Marcus, Feb 27 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon E. Schoenfield, Feb 26 2021
STATUS
approved