OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
The prime 29=5^2+2^2 such that 5+2=7 is prime of form 4k+3.
MATHEMATICA
nn = 60; t = {}; Do[p1 = a^2 + b^2; p2 = a + b; If[p1 < nn^2 && PrimeQ[p1] && Mod[p2, 4] == 3 && PrimeQ[p2], AppendTo[t, p1]], {a, nn}, {b, a}]; Sort[t] (* T. D. Noe, Apr 23 2012 *)
PROG
(PARI) list(lim)=my(v=List(), t); for(a=1, sqrt(lim), forstep(b=(2-a)%4+1, min(a, sqrt(lim-a^2)), 4, if(isprime(a+b)&&isprime(t=a^2+b^2), listput(v, t)))); vecsort(Vec(v)) \\ Charles R Greathouse IV, Apr 24 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Thomas Ordowski, Apr 23 2012
EXTENSIONS
Extended by T. D. Noe, Apr 23 2012
STATUS
approved