login
A176134
Primes p of the form |prime(n+2)^2-prime(n+1)^2-prime(n)^2|, (absolute values).
4
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,1
COMMENTS
11^2-7^2-5^2=47, 19^2-17^2-13^2=abs(97),...
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 *)
CROSSREFS
Sequence in context: A281437 A319051 A180550 * A155844 A245688 A211331
KEYWORD
nonn
AUTHOR
STATUS
approved