|
| |
|
|
A059102
|
|
Number of terms of the fractional part of A030168 for which the geometric mean produces increasingly better approximations to Khinchin's constant.
|
|
0
|
|
|
|
1, 9, 10, 12, 13, 26, 48, 49, 51, 65, 66, 67, 1330, 1331, 1332, 1336, 1337, 1338, 1339, 1340, 1431, 5666, 10331, 537086, 537095, 538045, 576768, 576789
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
Next term > 3307254.
|
|
|
LINKS
|
Table of n, a(n) for n=1..28.
|
|
|
FORMULA
|
p = Drop[{A030168}, 1]; q = N[1, 100]; r = p[[1]] + 1; t = {}; Do[q = q*p[[i]]; g = q^(1/i) - Khinchin; If[Abs[g] < r, r = Abs[g]; t = Append[t, i]], {i, 1, Length[p]}]; t
|
|
|
EXAMPLE
|
The geometric mean of 67 terms (Khinchin + 0.0128639) is not bettered until we calculate the geometric mean of 1330 terms (Khinchin + 0.011153).
|
|
|
CROSSREFS
|
Cf. A030168, A048613.
Sequence in context: A104627 A188057 A119956 * A214602 A167819 A120185
Adjacent sequences: A059099 A059100 A059101 * A059103 A059104 A059105
|
|
|
KEYWORD
|
cofr,nonn
|
|
|
AUTHOR
|
Hans Havermann, Feb 13 2001
|
|
|
STATUS
|
approved
|
| |
|
|
