login
A086044
Position of first occurrence of n in concatenated numbers (A033307, Champernowne constant).
4
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 2, 17, 19, 21, 23, 25, 27, 29, 31, 16, 35, 3, 39, 41, 43, 45, 47, 49, 51, 18, 38, 57, 4, 61, 63, 65, 67, 69, 71, 20, 40, 60, 79, 5, 83, 85, 87, 89, 91, 22, 42, 62, 82, 101, 6, 105, 107, 109, 111, 24, 44, 64, 84, 104, 123, 7, 127
OFFSET
0,2
COMMENTS
A033307(a(n)) = A000030(n).
LINKS
Eric Weisstein's World of Mathematics, Champernowne Constant
MATHEMATICA
With[{ch=Flatten[IntegerDigits/@Range[0, 500]]}, Table[ SequencePosition[ ch, IntegerDigits[n], 1][[1]], {n, 0, 70}]][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 07 2020 *)
CROSSREFS
Sequence in context: A004907 A004918 A341537 * A257456 A257340 A194974
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Jul 07 2003
STATUS
approved