login
A232536
Values x of successive minima records of k = log(x)/log(d) where d runs through the positive values of x^3-round(sqrt(x^3))^2.
1
3, 5, 11, 87, 148, 337, 735, 1959, 2142, 2312, 3998, 7144, 11676, 11768, 21623, 36880, 53629, 58449, 944820, 1154502, 1227450, 2319244, 2694319, 4308024, 6533992, 6907256, 48134226, 108443391, 179294589, 274644065, 664314556
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. A232008.
Sequence in context: A182354 A046928 A089070 * A168040 A068157 A062530
KEYWORD
nonn,more
AUTHOR
Artur Jasinski, Nov 25 2013
EXTENSIONS
a(18)-a(31) from Amiram Eldar, Oct 23 2024
STATUS
approved