|
%I #4 Mar 12 2015 16:17:02
%S 3,6,9,11,14,18,19,21,26,27,30,33,35,38,41,42,46,51,53,54,59,62,66,69,
%T 73,74,75,81,83,86,90,91,98,99,101,102,105,107,110,114,117,118,123,
%U 126,129,131,137,138,146,147,149,150,154,158,161,163,165,170,171,174,179,181,182
%N Numbers of the form 1+x^2+y^2, x, y integers >= 1.
%t With[{nn=40},Take[Union[Total/@Tuples[Range[nn]^2,2]+1],2*nn]] (* _Harvey P. Dale_, Mar 12 2015 *)
%Y Cf. A000408, A000378, A005767, A169580, A166687.
%K nonn
%O 1,1
%A _N. J. A. Sloane_, Mar 05 2010
|
