|
%I #14 Sep 25 2019 16:32:14
%S 1,2,6,8,10,12,13,19,26,31,33,39,40,43,46,52,68,72,78,84,90,93,95,105,
%T 109,133,139,149,152,162,176,180,190,202,211,219,231,243,265,269,272,
%U 306,330,336,341,346,351,356,366,393,407,422,436,446,450,467,501
%N 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.
%H J. Calvo, J. Herranz, G. Saez, <a href="https://doi.org/10.1090/S0025-5718-09-02240-6">A new algorithm to search for small nonzero |x^3 - y^2| values</a>, Math. Comp. 78 (2009), 2435-2444.
%t 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
%Y Cf. A078933, A179107, A179108, A179109.
%K nonn
%O 1,2
%A _Artur Jasinski_, Oct 30 2011
%E Definition modified by _Harvey P. Dale_, Sep 25 2019
|
