%I #9 Sep 16 2015 13:03:30
%S 25,49,121,169,289,961,1681,1849,2401,5929,6889,10201,11881,14161,
%T 17689,32041,41209,69169,76729,80089,94249,96721,108241,124609,142129,
%U 165649,170569,175561,185761,190969,214369,223729,243049,332929,337561
%N Squares of the form 4*A014574(n-1) + 1.
%H Vincenzo Librandi, <a href="/A131706/b131706.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[600]^2, PrimeQ[(# - 1)/4 - 1] && PrimeQ[(# - 1)/4 + 1] &] (* _Stefan Steinerberger_, Sep 17 2007 *)
%K nonn
%O 1,1
%A _Giovanni Teofilatto_, Sep 17 2007
%E More terms from _Stefan Steinerberger_, Sep 17 2007