OFFSET
1,1
COMMENTS
Squares of these numbers are of the form N^4-M^2 (where N belongs to A135786 and M to A135796) Proof uses: (x^4+6x^2y^2+y^4)^2=(x^2-y^2)^4+(4x^3y+4x*y^3)^2(*Artur Jasinski*)
Refers to A057102, which had an incorrect description and has been replaced by A256418. As a result the present sequence should be re-checked. - N. J. A. Sloane, Apr 06 2015
MATHEMATICA
a = {}; Do[Do[w = x^4 + 6x^2 y^2 + y^4; If[w < 10000, AppendTo[a, w]], {x, y, 1000}], {y, 1, 1000}]; Union[a] (*Artur Jasinski*)
Union[Select[#[[1]]^4+6#[[1]]^2 #[[2]]^2+#[[2]]^4&/@Tuples[Range[ 1000], 2], #<10000&]] (* Harvey P. Dale, Oct 07 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Nov 29 2007
STATUS
approved