A176134 Primes p of the form |prime(n+2)^2-prime(n+1)^2-prime(n)^2|, (absolute values).

47, 97, 409, 433, 1201, 1321, 1249, 2713, 3169, 4201, 4129, 5209, 7129, 9001, 10177, 8521, 15889, 20353, 29209, 36457, 33889, 48817, 49681, 52201, 69073, 71209, 93001, 94201, 88897, 117529, 118801, 140401, 165601, 203017, 210361, 225529, 229249

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Apr 09 2010

Keywords

• nonn

Comments

11^2-7^2-5^2=47, 19^2-17^2-13^2=abs(97),...

Crossrefs

Cf. A000040

Programs

Mathematica

Select[Table[Abs[Prime[n+2]^2-Prime[n+1]^2-Prime[n]^2],{n,6!}],PrimeQ[ # ]&]
Select[Abs[#[[3]]-#[[2]]-#[[1]]]&/@(Partition[Prime[Range[100]],3,1]^2), PrimeQ] (* Harvey P. Dale, Jun 24 2013 *)