cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A180442 Numbers n such that a sum of two or more consecutive squares beginning with n^2 is a square.

Original entry on oeis.org

1, 3, 7, 9, 11, 13, 15, 17, 18, 20, 21, 22, 25, 27, 28, 30, 32, 38, 44, 50, 52, 55, 58, 60, 64, 65, 67, 73, 74, 76, 83, 87, 91, 103, 104, 106, 112, 115, 117, 119, 121, 124, 128, 129, 131, 132, 137, 140, 142, 146, 158, 168, 170, 172, 175, 178, 181, 183, 192, 193, 197, 199, 200, 204
Offset: 1

Views

Author

Zhining Yang, Jan 19 2011

Keywords

Comments

That is, numbers n such that Sum_{i=n..k} i^2 is a square for some k > n.
The paper by Bremner, Stroeker, and Tzanakis describes how they found all n <= 100 by solving elliptic curves. Their solutions are the same as the terms in this sequence. They also show that there are only a finite number of sums of squares beginning with n^2 that sum to a square. For example, starting with 3^2, there are only 3 ways to sum consecutive squares to produce a square: 3^2 + 4^2, 3^2 + ... + 580^2, and 3^2 + ... + 963^2. See A184762, A184763, A184885, and A184886 for more results from their paper.
This sequence is more difficult than A001032, which has the possible lengths of the sequences of consecutive squares that sum to a square. Be careful adding terms to this sequence; a simple search may miss some terms. An elliptic curve needs to be solved for each number.
It is conjectured that the sequence continues 103, 104, 106, 112, 115, 117, 119, 121, 124, 128, 129, 131, 132, 137, 140, 142, 146, 158, 168, 170, 172, 175, 178, 181, 183, 192, 193, 197, 199, 200. - Jean-François Alcover, Sep 17 2013. Conjecture confirmed (see the Schoenfield link below). - Jon E. Schoenfield, Nov 22 2013

Examples

			30 is in the sequence because 30^2 + 31^2 + 32^2 + ... + 197^2 + 198^2 = 1612^2.
		

Crossrefs

Programs

Formula

Numbers n such that A075404(n) > 0.

Extensions

Example simplified by Jon E. Schoenfield, Sep 18 2013
More terms from Jon E. Schoenfield, Nov 22 2013

A075404 Smallest m > n such that Sum_{i=n..m} i^2 is a square, or 0 if no such m exists.

Original entry on oeis.org

24, 0, 4, 0, 0, 0, 29, 0, 32, 0, 22908, 0, 108, 0, 111, 0, 39, 28, 0, 21, 116, 80, 0, 0, 48, 0, 59, 77, 0, 198, 0, 609, 0, 0, 0, 0, 0, 48, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 0, 171, 0, 147, 0, 0, 3533, 0, 0, 2132, 0, 92, 0, 0, 0, 305, 282, 0, 116, 0, 0, 0, 0, 0, 194, 36554, 0, 99, 0, 0, 0, 0, 0, 0, 276, 0, 0, 0, 136, 0, 0, 0, 332, 0, 0, 0, 0, 0, 0, 0, 0, 0
Offset: 1

Views

Author

Zak Seidov, Sep 13 2002

Keywords

Comments

For a(1) see A000330.
The corresponding squares are in A075405, the numbers of terms in the sum = a(n)-n+1 are in A075406.
All terms were verified by solving elliptic curves. If a(n)>0, then there may be additional values of m that produce squares. See A184763 for more information.

Examples

			a(1) = 24 because 1^2+...+24^2 = 70^2, a(7) = 29 because 7^2+...+29^2 = 92^2.
		

References

Crossrefs

Cf. A000330, A075405, A075406, A180442 (n such that a(n) > 0).

Programs

  • Mathematica
    s[n_,k_]:=Module[{m=n+k-1},(m(m+1)(2m+1)-n(n-1)(2n-1))/6]; mx=40000; Table[k=2; While[k
    				

Extensions

Corrected and extended by Lior Manor, Sep 19 2002
Corrected and edited by T. D. Noe, Jan 21 2011

A075405 a(n)^2 is the square obtained in A075404 (or 0 if no such square exists).

Original entry on oeis.org

70, 0, 5, 0, 0, 0, 92, 0, 106, 0, 2001863, 0, 652, 0, 679, 0, 138, 77, 0, 29, 724, 413, 0, 0, 182, 0, 253, 385, 0, 1612, 0, 8687, 0, 0, 0, 0, 0, 143, 0, 0, 0, 0, 0, 274, 0, 0, 0, 0, 0, 1281, 0, 1012, 0, 0, 121268, 0, 0, 56855, 0, 440, 0, 0, 0, 3069, 2725, 0, 655, 0, 0, 0, 0, 0, 1525, 4035066, 0, 430, 0, 0, 0, 0, 0, 0, 2619, 0, 0, 0, 795, 0, 0, 0, 3465, 0, 0, 0, 0, 0, 0, 0, 0, 0
Offset: 1

Views

Author

Zak Seidov, Sep 13 2002

Keywords

Examples

			a(1) = 70 because 1^2+...+24^2 = a(1)^2 = 70^2.
		

References

Crossrefs

Programs

  • Mathematica
    s[n_, k_]:=Module[{m=n+k-1}, (m(m+1)(2m+1)-n(n-1)(2n-1))/6]; mx=40000; Table[k=2; While[k
    				

Extensions

Corrected and extended by Lior Manor, Sep 19 2002
Corrected and edited by T. D. Noe, Jan 21 2011

A184762 The number of numbers k > n such that Sum_{i=n..k} i^2 is a square.

Original entry on oeis.org

1, 0, 3, 0, 0, 0, 5, 0, 2, 0, 1, 0, 1, 0, 2, 0, 2, 1, 0, 4, 1, 2, 0, 0, 7, 0, 2, 2, 0, 1, 0, 4, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 2, 0, 2, 0, 0, 1, 0, 0, 1, 0, 2, 0, 0, 0, 1, 2, 0, 2, 0, 0, 0, 0, 0, 2, 1, 0, 1, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0
Offset: 1

Views

Author

T. D. Noe, Jan 21 2011

Keywords

Comments

It is an old result (see Watson) that for n=1 the only k>n is k=24. Bremner, Stroeker, and Tzanakis compute the k for n <= 100 by solving elliptic curves. This sequence lists the number of k for each n; the values of k are in A184763. Sequence A180442 lists the n for which a(n) is nonzero.

Crossrefs

Showing 1-4 of 4 results.