%I #18 Nov 07 2023 03:21:44
%S 7,5,79,241,727,23,937,19681,431,499,4703,8093,40193,2869781,483671,
%T 94747,4657,232452293,498112057,2812679,31381059607,3765727153,
%U 1364071,44594137339,125231,13170403,5353801183,4159349,46050353857,294487079,26892769,29178816413,3533781113
%N Largest prime factor of 3^n-2.
%H Hugo Pfoertner, <a href="/A080798/b080798.txt">Table of n, a(n) for n = 2..210</a>
%F a(n) = A006530(A058481(n)). - _Michel Marcus_, Jul 12 2019
%t FactorInteger[#][[-1,1]]&/@(3^Range[2,30]-2) (* _Harvey P. Dale_, Apr 07 2022 *)
%o (PARI) a(n) = vecmax(factor(3^n-2)[,1]); \\ _Michel Marcus_, Jul 12 2019
%o (Magma) [Max(PrimeDivisors(3^n-2)):n in [2..30]]; // _Marius A. Burtea_, Jul 12 2019
%Y Cf. A014224, A014232, A080443, A080892.
%Y Cf. A006530, A058481.
%K nonn
%O 2,1
%A _Hugo Pfoertner_, Mar 25 2003
|