|
Search: id:A145913
|
|
|
| A145913 |
|
a(n) = smallest integer k such that 1/Log[(1 + k)^(1/k)] is bigger than n |
|
+0
3
|
|
| 1, 3, 6, 10, 14, 18, 22, 27, 32, 37, 42, 47, 52, 57, 63, 68, 74, 79, 85, 91, 97, 102, 108, 114, 120, 126, 133, 139, 145, 151, 157, 164, 170, 176, 183, 189, 196, 202, 209, 216, 222, 229, 235, 242, 249, 256, 262, 269, 276, 283, 290, 297, 304, 310, 317, 324, 331
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
1/Log[(1 + k)^(1/k)] = 1/Hypergeometric2F1[1,1,2,-z]
|
|
MATHEMATICA
|
a = {}; k = 1; Do[If[N[((1/n) Log[1 + n])^(-1)] > k, AppendTo[a, n]; k = k + 1], {n, 1, 1010}]; a (*Artur Jasinski*)
|
|
CROSSREFS
|
Sequence in context: A078060 A022764 A113127 this_sequence A130246 A167381 A036572
Adjacent sequences: A145910 A145911 A145912 this_sequence A145914 A145915 A145916
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Oct 24 2008
|
|
|
Search completed in 0.002 seconds
|
