A240552 Greatest prime factor of n^9+1.

2, 19, 37, 109, 5167, 46441, 117307, 87211, 530713, 52579, 590077, 1801, 937, 132049, 811, 38737, 5653, 465841, 236377, 69481, 613, 5966803, 1117, 7561, 6597973, 102966067, 19927, 102547, 10435069, 120871, 1538083, 18837001, 221401, 745903, 612740917, 55117

Offset: 1

Author

T. D. Noe, Apr 07 2014

Keywords

• nonn

Links

• T. D. Noe, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A014442, A081256, A096172, A240548, A240549, A240550, A240551, A240553.

Programs

Mathematica

Table[FactorInteger[n^9 + 1][[-1, 1]], {n, 100}]

PARI

a(n) = vecmax(factor(n^9+1)[,1]); \\ Michel Marcus, Dec 17 2017