login
A214812
Largest prime factor of (p^p-1)/(p-1) where p = prime(n).
6
3, 13, 71, 4733, 1806113, 1803647, 2699538733, 109912203092239643840221, 1920647391913, 549334763, 568972471024107865287021434301977158534824481, 41903425553544839998158239, 5926187589691497537793497756719, 19825223972382274003506149120708429799166030881820329892377241, 194707033016099228267068299180244011637
OFFSET
1,1
LINKS
T. S. Motzkin, Sorting numbers for cylinders and other classification numbers, in Combinatorics, Proc. Symp. Pure Math. 19, AMS, 1971, pp. 167-176. [Annotated, scanned copy]
FORMULA
a(n) = A006530(A001039(n)). - Daniel Suteu, May 26 2022
MATHEMATICA
FactorInteger[#][[-1, 1]]&/@Table[(p^p-1)/(p-1), {p, Prime[Range[15]]}] (* Harvey P. Dale, Aug 27 2016 *)
PROG
(PARI) a(n) = my(p=prime(n)); vecmax(factor((p^p-1)/(p-1))[, 1]); \\ Daniel Suteu, May 26 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jul 31 2012
STATUS
approved