|
|
A092318
|
|
a(n) = smallest m such that value of odd harmonic series Sum_{j=0..m} 1/(2j+1) is >= n.
|
|
8
|
|
|
0, 7, 56, 418, 3091, 22845, 168803, 1247297, 9216353, 68100150, 503195828, 3718142207, 27473561357, 203003686105, 1500005624923, 11083625711270, 81897532160124, 605145459495140, 4471453748222756, 33039822589391675
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
a[n_] := Floor[(Exp[2 n - EulerGamma] + 1/2)/4]; a[1] = 0; Array[a, 20] (* Robert G. Wilson v, Jan 25 2017 *)
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A281355 (= a(n) + 1) for a variant.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|