OFFSET
0,2
COMMENTS
Same as A054870 except correctly indexed with [a_0; a_1, a_2, ...]
LINKS
Eric Weisstein's World of Mathematics, Khinchin's Constant Continued Fraction
FORMULA
a(n) = A054870(n) - 1.
MATHEMATICA
Module[{nn=2500, k}, k=ContinuedFraction[Khinchin, nn]; DeleteDuplicates[Thread[{Range[nn], k}], GreaterEqual[#1[[2]], #2[[2]]]&]][[;; , 1]]-1 (* The program generates the first 8 terms of the sequence. *) (* Harvey P. Dale, Feb 28 2025 *)
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Eric W. Weisstein, Jul 22 2013
STATUS
approved