login
A075576
Smaller of two consecutive squares with a prime sum.
0
1, 4, 16, 25, 49, 81, 144, 196, 289, 361, 484, 576, 625, 841, 900, 1024, 1156, 1225, 1521, 1764, 2209, 2500, 3600, 4225, 4761, 4900, 5184, 6241, 6724, 7056, 7225, 7569, 8100, 9409, 9801, 10000, 10404, 10816, 11881, 12100, 13225, 14884, 16900, 18225
OFFSET
0,2
MAPLE
s := 0:for i from 1 to 300 do if(isprime(i^2+(i+1)^2)) then s := s+1:a[s] := i^2:fi:od:seq(a[k], k=1..s);
CROSSREFS
Sequence in context: A087055 A135556 A163095 * A353295 A363428 A295921
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 25 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 26 2003
STATUS
approved