login
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
OFFSET
1,2
COMMENTS
Next term > 3307254.
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
Sequence in context: A104627 A188057 A119956 * A295743 A356659 A214602
KEYWORD
nonn
AUTHOR
Hans Havermann, Feb 13 2001
STATUS
approved