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

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

Author

Artur Jasinski, Oct 30 2011

Keywords

• nonn

Comments

Successive records in A077116.

Links

• J. Calvo, J. Herranz, G. Saez, A new algorithm to search for small nonzero |x^3 - y^2| values, Math. Comp. 78 (2009), 2435-2444.

Crossrefs

Cf. A077116, A078933, A179107, A179108, A179109.

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