OFFSET
1,2
COMMENTS
No positive terms == {0,8} (mod 10). Numbers k such that both k and k+2 are terms: 12, 94, 122, 152, 182, 252, 362, 204, ... Numbers k such that k, k+2 and k+4 are terms: 1942, 7222, 7402, 15692, 23502, 30182, ... - Zak Seidov, Aug 22 2014
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MAPLE
select(t -> isprime(t^2+(t+1)^2+(t+2)^2), [$0..1000]); # Robert Israel, Aug 22 2014
MATHEMATICA
Select[Range[0, 700], PrimeQ[Total[(#+{0, 1, 2})^2]]&] (* Harvey P. Dale, Apr 28 2012 *)
PROG
(Magma) [n: n in [0..1000] |IsPrime(n^2+(n+1)^2+(n+2)^2)]; // Vincenzo Librandi, Nov 18 2010
(PARI)
for(n=1, 10^3, s=sum(i=0, 2, (n+i)^2); if(isprime(s), print1(n, ", "))) \\ Derek Orr, Aug 22 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved