This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A113480 #18 Feb 25 2021 19:39:26
%S A113480 0,1,105,369,25521
%N A113480 Numbers n such that 17^n + 2 is prime.
%C A113480 Only numbers of the form 6k-5 and 6k-3 need be tested.
%C A113480 No further terms < 100000. - _Ray Chandler_, Jul 31 2011
%C A113480 a(6) > 2*10^5. - _Robert Price_, Oct 23 2014
%H A113480 Henri & Renaud Lifchitz, <a href="http://www.primenumbers.net/prptop/searchform.php?form=17%5En%2B2&action=Search">PRP Records</a>.
%t A113480 Do[If[PrimeQ[17^n + 2], Print[n]], {n, 0, 2500}] (* _Stefan Steinerberger_, Jan 28 2006 *)
%t A113480 Join[{0},
%t A113480 Select[Flatten[Table[6 n - {5, 3}, {n, 5000}]], PrimeQ[17^# + 2] &]] (* _Harvey P. Dale_, Feb 25 2021 *)
%o A113480 (PARI) g2(n)= { print1(0","); forstep(x=1,n,6, if(ispseudoprime(17^x+2),print1(x",")); if(ispseudoprime(17^(x+2)+2),print1(x+2",")) ) }
%K A113480 nonn
%O A113480 1,3
%A A113480 _Cino Hilliard_, Jan 09 2006
%E A113480 25521 from _Ray Chandler_, Jul 30 2011