OFFSET
1,11
EXAMPLE
The first few points (listing [x^2+y^2,x,y]) are: [0, 0, 0], [1, -1, 0], [1, 0, -1], [1, 0, 1], [1, 1, 0], [2, -1, -1], [2, -1, 1], [2, 1, -1], [2, 1, 1], [4, -2, 0], [4, 0, -2], [4, 0, 2], [4, 2, 0], [5, -2, -1], [5, -2, 1], [5, -1, -2], [5, -1, 2], [5, 1, -2], [5, 1, 2], [5, 2, -1], [5, 2, 1], [8, -2, -2], [8, -2, 2], [8, 2, -2], ...
MAPLE
PROG
(PARI) rs(t)=round(sqrt(abs(t))); pt(t)=print1(rs(t)*sign(t), ", "); for(r2=0, 26, xm=rs(r2); for(x=-xm, xm, y2=r2-x^2; if(issquare(y2), if(y2==0, pt(0), pt(-y2); pt(y2))))) \\ Hugo Pfoertner, Jun 18 2018
CROSSREFS
KEYWORD
sign
AUTHOR
N. J. A. Sloane, Mar 04 2017, following a suggestion from Ahmet Arduç
STATUS
approved