OFFSET
1,1
COMMENTS
A094550 generalized to squares. Note that equality is attained only for very long sums of squares.
a(31) > 4*10^6. [From Donovan Johnson, Apr 20 2010]
EXAMPLE
52 is in this sequence because 7^2+8^2+...+51^2 = 53^2+54^2+...+65^2.
MATHEMATICA
lst={}; Do[i1=n-1; i2=n+1; s1=i1^2; s2=i2^2; While[i1>1 && s1!=s2, If[s1<s2, i1--; s1=s1+i1^2, i2++; s2=s2+i2^2]]; If[s1==s2, AppendTo[lst, n]], {n, 2, 100000}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, May 10 2004
EXTENSIONS
a(14)-a(30) from Donovan Johnson, Apr 20 2010
STATUS
approved