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 A103564 #13 Sep 08 2022 08:45:17 %S A103564 3,7,13,53,67,97,227,263,277,337,487,503,547,557,613,617,647,683,727, %T A103564 937,953,977,1093,1277,1327,1427,1583,1637,1663,1723,1873,1907,1987, %U A103564 2087,2267,2297,2467,2593,2663,2677,2803,3037,3083,3343,3373,3433,3643 %N A103564 Primes p such that 3*p^2 + 2 is prime. %H A103564 Harvey P. Dale, <a href="/A103564/b103564.txt">Table of n, a(n) for n = 1..1000</a> %t A103564 f[n_]:=PrimeQ[(n-1)^2+n^2+(n+1)^2];lst={};Do[p=Prime[n];If[f[p],AppendTo[lst,p]],{n,6!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Oct 27 2009 *) %t A103564 Select[Prime[Range[600]],PrimeQ[3#^2+2]&] (* _Harvey P. Dale_, Nov 08 2011 *) %o A103564 (Magma) [p: p in PrimesUpTo(5000)|IsPrime(3*p^2+2)] // _Vincenzo Librandi_, Jan 30 2011 %K A103564 nonn %O A103564 1,1 %A A103564 _Zak Seidov_, Mar 23 2005