OFFSET
0,1
LINKS
Eric W. Weisstein, Table of n, a(n) for n = 0..999
Eric Weisstein's World of Mathematics, Constant Digit Scanning
Eric Weisstein's World of Mathematics, Khinchin's Constant Digits
MATHEMATICA
Module[{nn=500, k}, k=RealDigits[Khinchin, 10, nn][[1]]; Flatten[Table[SequencePosition[k, IntegerDigits[m], 1], {m, 0, 80}], 1]][[;; , 1]] (* Harvey P. Dale, Jul 31 2025 *)
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Eric W. Weisstein, Sep 15 2013
STATUS
approved
