login
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.
1
6, 7, 75, 88, 140, 236, 591, 2296, 2729, 5615, 8980, 21595, 22551, 36848, 45545, 282080, 471585, 2533636, 3041076, 13428046, 78877882, 263457906, 792970403
OFFSET
1,1
COMMENTS
k = log(x)/log(d) tends down to 2/3 as x tends to infinity.
MATHEMATICA
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
CROSSREFS
Cf. A232536.
Sequence in context: A256292 A042877 A219517 * A156791 A223532 A041081
KEYWORD
nonn,more
AUTHOR
Artur Jasinski, Nov 25 2013
EXTENSIONS
a(18)-a(23) from Amiram Eldar, Oct 23 2024
STATUS
approved