A081702 Largest prime factor of the n-th Carmichael number (A002997).

17, 17, 19, 29, 31, 41, 67, 73, 73, 61, 41, 97, 103, 89, 37, 31, 101, 241, 73, 233, 61, 109, 101, 113, 109, 397, 409, 67, 211, 137, 163, 181, 271, 421, 61, 197, 271, 199, 433, 73, 151, 61, 577, 271, 307, 37, 163, 211, 631, 541, 113, 353, 199, 331, 461, 101, 97

Offset: 1

Author

Lekraj Beedassy, Apr 02 2003

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A002997, A006530.

Programs

Mathematica

CarmichaelQ[n_] := Not[PrimeQ[n]] && Divisible[n - 1, CarmichaelLambda[n]]; FactorInteger[#][[-1, 1]]& /@ Select[Range[4, 10^7], CarmichaelQ] (* Amiram Eldar, Jun 24 2019 after Jean-François Alcover at A141710 *)

Formula

a(n) = A006530(A002997(n)). - Amiram Eldar, Jun 24 2019