A232008 - OEIS

A232008

Values x of successive minima records of k = log(x)/log(-d) where d runs through the negative values of x^3-round(sqrt(x^3))^2.

%I #28 Oct 24 2024 09:25:44

%S 6,7,75,88,140,236,591,2296,2729,5615,8980,21595,22551,36848,45545,

%T 282080,471585,2533636,3041076,13428046,78877882,263457906,792970403

%N Values x of successive minima records of k = log(x)/log(-d) where d runs through the negative values of x^3-round(sqrt(x^3))^2.

%C k = log(x)/log(d) tends down to 2/3 as x tends to infinity.

%t kk = 2; Do[d = x^3 - Round[Sqrt[x^3]]^2; If[d != 0, If[d < 0, w = Log[x]/Log[-d]; If[w < kk, kk = w; AppendTo[aa, x]]]], {x, 1, 1000000}]; aa

%Y Cf. A232536.

%K nonn,more

%O 1,1

%A _Artur Jasinski_, Nov 25 2013

%E a(18)-a(23) from _Amiram Eldar_, Oct 23 2024