cp's OEIS Frontend

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.

A095697 Primes of the form x^2 + y^2 + z, where x, y and z are three successive numbers.

This page as a plain text file.
%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