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.

Previous Showing 31-32 of 32 results.

A198831 Successive records in maximal positive distance d = x^3 - y^2.

Original entry on oeis.org

0, 4, 20, 28, 39, 47, 81, 135, 152, 207, 216, 270, 496, 546, 615, 732, 832, 1148, 1208, 1343, 1391, 1541, 1750, 2000, 2260, 2548, 2575, 2825, 3679, 3807, 4220, 4604, 5076, 5508, 5835, 5859, 6291, 7538, 7656, 8188, 8423, 8712, 8964, 12092, 12205, 12511, 12926
Offset: 1

Views

Author

Artur Jasinski, Oct 30 2011

Keywords

Comments

Successive records in A077116.

Crossrefs

Programs

  • Mathematica
    aa = {}; bb = {}; max = -1; Do[kk = x^3 - Floor[x^(3/2)]^2; If[kk > max, AppendTo[aa, kk]; AppendTo[bb, x]; max = kk], {x, 1, 10000}]; aa

A198832 Values x for records of maxima of positive distance d between a cube of positive integer x and a square of integer y and such that d = x^3 - y^2.

Original entry on oeis.org

1, 2, 6, 8, 10, 12, 13, 19, 26, 31, 33, 39, 40, 43, 46, 52, 68, 72, 78, 84, 90, 93, 95, 105, 109, 133, 139, 149, 152, 162, 176, 180, 190, 202, 211, 219, 231, 243, 265, 269, 272, 306, 330, 336, 341, 346, 351, 356, 366, 393, 407, 422, 436, 446, 450, 467, 501
Offset: 1

Views

Author

Artur Jasinski, Oct 30 2011

Keywords

Crossrefs

Programs

  • Mathematica
    aa = {}; bb = {}; max = -1; Do[kk = x^3 - Floor[x^(3/2)]^2; If[kk > max, AppendTo[aa, kk]; AppendTo[bb, x]; max = kk], {x, 1, 10000}]; bb

Extensions

Definition modified by Harvey P. Dale, Sep 25 2019
Previous Showing 31-32 of 32 results.