|
|
A145914
|
|
a(n) is the smallest integer k such that log(1/log((1+k)^(1/k))) > n.
|
|
2
|
|
|
5, 24, 91, 315, 1030, 3265, 10113, 30811, 92674, 275947, 814940, 2390374, 6971243, 20231089, 58462783, 168314905, 482990543, 1381928691, 3943632121, 11227515044, 31896566383, 90440011395, 255980057462, 723342392122, 2040937869097, 5750599584280, 16182211978468
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
log(1/log((1+k)^(1/k))) = log(1/Hypergeometric2F1[1,1,2,-z]).
|
|
LINKS
|
|
|
MAPLE
|
a:= n-> ceil(-LambertW(-1, -exp(-n-exp(-n)))*exp(n)-1):
|
|
MATHEMATICA
|
a = {}; k = 1; Do[If[N[Log[1/Log[(1 + n)^(1/n)]]] > k, Print[n]; AppendTo[a, n]; k = k + 1], {n, 1, 1000000}]; a
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|