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-3 of 3 results.

A179145 Numbers n such that Mordell's equation y^2 = x^3 + n has exactly 1 integral solution.

Original entry on oeis.org

27, 125, 216, 1728, 2197, 3375, 4913, 6859, 8000, 13824, 19683, 24389, 27000, 29791, 59319, 68921, 74088, 79507, 91125, 103823, 110592, 132651, 140608, 148877, 157464, 166375, 195112, 205379, 216000, 226981, 238328, 287496, 300763, 314432
Offset: 1

Views

Author

Artur Jasinski, Jun 30 2010

Keywords

Links

Crossrefs

Cf. A054504, A081119, A179145-A179162, A356709.
Complement of A356703 among the positive cubes.
Cf. also A179163, A179419.

Programs

  • Mathematica
    (* Assuming every term is a cube *) xmax = 2000; r[n_] := Reap[ Do[ rpos = Reduce[y^2 == x^3 + n, y, Integers]; If[rpos =!= False, Sow[rpos]]; rneg = Reduce[y^2 == (-x)^3 + n, y, Integers]; If[rneg =!= False, Sow[rneg]], {x, 1, xmax}]]; ok[n_] := Which[ rn = r[n]; rn[[2]] === {}, False, Length[rn[[2]]] > 1, False, ! FreeQ[rn[[2, 1]], Or], False, True, True]; ok[n_ /; !IntegerQ[n^(1/3)]] = False; ok[1]=False; A179145 = Reap[ Do[ If[ok[n], Print[n]; Sow[n]], {n, 1, 320000}]][[2, 1]] (* Jean-François Alcover, Apr 12 2012 *)

Formula

a(n) = A356709(n)^3. - Jianing Song, Aug 24 2022

Extensions

Edited and extended by Ray Chandler, Jul 11 2010

A179163 Numbers k such that Mordell's equation y^2 = x^3 - k has exactly 1 integral solution.

Original entry on oeis.org

1, 8, 27, 64, 125, 512, 729, 1000, 1728, 2197, 2744, 3375, 4096, 4913, 5832, 6859, 8000, 9261, 10648, 15625, 19683, 24389, 27000, 32768, 35937, 39304, 42875, 46656, 50653, 59319, 64000, 68921, 79507, 91125, 97336, 110592, 117649, 125000, 132651
Offset: 1

Views

Author

Artur Jasinski, Jun 30 2010

Keywords

Comments

Contains all sixth powers: suppose that y^2 = x^3 - t^6, then (y/t^3)^2 = (x/t^2)^3 - 1. The elliptic curve Y^2 = X^3 - 1 has rank 0 and the only rational points on it are (1,0), so y^2 = x^3 - t^6 has only one solution (t^2,0). - Jianing Song, Aug 24 2022

Links

Crossrefs

Cf. A081120, A081121, A179163-A179175, A356713.
Complement of A179149 among the positive cubes.
Cf. also A179145, A356703.

Programs

  • Mathematica
    (* Assuming every term is a cube *) xmax = 2000; r[n_] := Reap[Do[rpos = Reduce[y^2 == x^3 - n, y, Integers]; If[rpos =!= False, Sow[rpos]]; rneg = Reduce[y^2 == (-x)^3 - n, y, Integers]; If[rneg =!= False, Sow[rneg]], {x, 1, xmax}]]; ok[1] = True; ok[n_] := Which[rn = r[n]; rn[[2]] === {}, False, Length[rn[[2]]] > 1, False, ! FreeQ[rn[[2, 1]], Or], False, True, True]; ok[n_ /; !IntegerQ[n^(1/3)]] = False; A179163 = Reap[Do[If[ok[n], Print[n]; Sow[n]], {n, 1, 140000}]][[2, 1]] (* Jean-François Alcover, Apr 12 2012 *)

Formula

a(n) = A356713(n)^3. - Jianing Song, Aug 24 2022

Extensions

Edited and extended by Ray Chandler, Jul 11 2010

A356720 Numbers k such that Mordell's equation y^2 = x^3 + k^3 has more than 1 integral solution.

Original entry on oeis.org

1, 2, 4, 7, 8, 9, 10, 11, 14, 16, 18, 21, 22, 23, 25, 26, 28, 32, 33, 34, 35, 36, 37, 38, 40, 44, 46, 49, 50, 56, 57, 63, 64, 65, 70, 71, 72, 74, 78, 81, 84, 86, 88, 90, 91, 92, 95, 98, 99, 100, 104, 105, 110, 112, 114, 121, 122, 126, 128, 129, 130, 132, 136, 140, 144, 148
Offset: 1

Views

Author

Jianing Song, Aug 24 2022

Keywords

Comments

Numbers k such that Mordell's equation y^2 = x^3 + k^3 has solutions other than the trivial solution (-k,0).
Different from A103254, which lists k such that Mordell's equation y^2 = x^3 + k^3 has solutions with positive x (or equivalently, with nonnegative x). 71, 74, and 155 are here but not in A103254.
Cube root of A356703.
Contains all squares since A356711 does.

Examples

			71 is a term since the equation y^2 = x^3 + 71^3 has 3 solutions (-71,0) and (-23,+-588).
74 is a term since the equation y^2 = x^3 + 74^3 has 3 solutions (-74,0) and (-47,+-549).
155 is a term since the equation y^2 = x^3 + 155^3 has 3 solutions (-155,0) and (-31,+-1922).

Links

Crossrefs

Cf. A081119, A356703, A356713, A228948, A103254. Complement of A356709.
Cf. also A356710, A356711, A356712.
Showing 1-3 of 3 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.