|
%I #11 Sep 08 2022 08:46:24
%S 2,3,29,13,41761,101,83233,22796593,184417,5653,63541,87415373,72337,
%T 2001793,100688449,238212511,52548582913,45957792327018709121,382069,
%U 20352763,1186844128302568601,88109799136087,6901823633,1109309383381084655697725873,48661191868691111041
%N Largest prime factor of 17^n + 1.
%H Max Alekseyev, <a href="/A324941/b324941.txt">Table of n, a(n) for n = 0..211</a>
%F a(n) = A006530(A224384(n)).
%t Table[FactorInteger[17^n + 1] [[-1,1]], {n, 0, 30}]
%o (Magma) [Maximum(PrimeDivisors(17^n + 1)): n in [0..40]];
%o (PARI) a(n) = vecmax(factor(17^n+1)[, 1]); \\ _Jinyuan Wang_, Apr 05 2019
%Y Cf. A006530, A224384.
%Y Cf. A002587, A074476, A274903, A074478, A274904, A227575, A274905, A002592, A003021, A062308, A002590.
%K nonn
%O 0,1
%A _Vincenzo Librandi_, Apr 05 2019
|
