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 A100902 #20 Sep 08 2022 08:45:15 %S A100902 0,1,2,3,4,9,12,30,49,56,115,118,376,432,1045,1310,6529,7768,8430, %T A100902 21942,26930,33568 %N A100902 Numbers n such that (6^n+1)^2-2 is prime. %H A100902 S. Harvey, <a href="http://harvey563.tripod.com/Carol_Kynea.txt">Carol and Kynea Primes</a>. %p A100902 A100902:=n->`if`(isprime((6^n+1)^2-2),n,NULL): seq(A100902(n), n=0..1000); # _Wesley Ivan Hurt_, Nov 02 2014 %t A100902 Select[Range[0, 2000], PrimeQ[(6^# + 1)^2 - 2] &] (* _Vincenzo Librandi_, Nov 03 2014 *) %o A100902 (Magma) [n: n in [0..300] | IsPrime((6^n+1)^2-2)]; // _Vincenzo Librandi_, Nov 03 2014 %o A100902 (PARI) is(n)=ispseudoprime((6^n+1)^2-2) \\ _Charles R Greathouse IV_, Feb 19 2016 %K A100902 nonn,more %O A100902 1,3 %A A100902 _Ray Chandler_, Nov 21 2004 %E A100902 Added 0 from _Vincenzo Librandi_, Nov 03 2014