OFFSET
1,1
COMMENTS
If the definition were changed from "nonzero squares" to "nonnegative squares", there would be just one additional term, 1. - T. D. Noe, May 27 2008
LINKS
EXAMPLE
E.g. 393^2 - 1 = 28^2 + 392^2 only.
MATHEMATICA
twoSquaresQ[ n_] := (r = Reduce [0 < a <= b && n^2 - 1 == a^2 + b^2, {a, b}, Integers]; Head[r] === And); Select[ Range[21000], twoSquaresQ] (* Jean-François Alcover, Oct 10 2011 *)
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
Patrick De Geest, Sep 15 1999
EXTENSIONS
More terms from James A. Sellers
STATUS
approved