|
Search: id:A094552
|
|
|
| A094552 |
|
Numbers n such that there are integers a < b with a^2+(a+1)^2+...+(n-1)^2 = (n+1)^2+(n+2)^2+...+b^2. |
|
+0
4
|
|
| 52, 100, 137, 513, 565, 1247, 8195, 13041, 18921, 35344, 40223, 65918, 68906
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
A094550 generalized to squares. Note that equality is attained only for very long sums of squares.
|
|
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
|
Cf. A094550, A094551, A094553.
Sequence in context: A090791 A026067 A039475 this_sequence A044141 A044522 A044239
Adjacent sequences: A094549 A094550 A094551 this_sequence A094553 A094554 A094555
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
T. D. Noe (noe(AT)sspectra.com), May 10 2004
|
|
|
Search completed in 0.002 seconds
|
