OFFSET
1,1
COMMENTS
If in the definition "maximum" is replaced with "minimum," then we obtain A247229.
FORMULA
a(n)==1 (mod prime(n)).
PROG
(PARI) a(n) = {maxi = 0; p = prime(n); for (i=2, p, f = factor((i^p-1)/(i-1)); gpf = f[#f~, 1]; if (! maxi, maxi = gpf, maxi = max(maxi, gpf)); ); maxi; } \\ Michel Marcus, Dec 09 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, Nov 27 2014
EXTENSIONS
More terms from Peter J. C. Moses, Nov 27 2014
STATUS
approved