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 A095697 #16 Apr 01 2023 11:34:42 %S A095697 3,17,47,233,563,863,1433,2417,3323,4007,4373,5153,7877,8387,11177, %T A095697 11783,13043,13697,15053,17207,17957,24533,30137,39623,51683,54287, %U A095697 58313,62483,66797,80603,82217,90527,92237,97463,101027,108347,112103 %N A095697 Primes of the form x^2 + y^2 + z, where x, y and z are three successive numbers. %C A095697 Equivalently, primes of the form 2n^2 + 3n + 3, generated by the n in A096689. %H A095697 Vincenzo Librandi, <a href="/A095697/b095697.txt">Table of n, a(n) for n = 1..1000</a> %t A095697 f[n_]:=n^2+(n+1)^2+(n+2); lst={};Do[p=f[n];If[PrimeQ[p],AppendTo[lst,p]],{n,0,6!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jul 04 2009 *) %t A095697 Select[Table[2*n^2+3*n+3,{n,0,2000}],PrimeQ] (* _Vincenzo Librandi_, Jul 17 2012 *) %t A095697 Select[#[[1]]^2+#[[2]]^2+#[[3]]&/@Partition[Range[0,300],3,1],PrimeQ] (* _Harvey P. Dale_, Apr 01 2023 *) %o A095697 (Magma) [a: n in [0..300] | IsPrime(a) where a is 2*n^2 + 3*n + 3]; // _Vincenzo Librandi_, Jul 17 2012 %Y A095697 Cf. A096690, A096691. %K A095697 nonn,easy %O A095697 1,1 %A A095697 _Giovanni Teofilatto_, Jul 06 2004 %E A095697 Extended by _Ray Chandler_, Jul 12 2004