A065648 a(0) = 1 and for n > 0: a(n) = number of indices 0 <= i <= n with A033307(i)=A033307(n), where A033307 is the sequence of decimal digits of Champernowne's constant 0.123456789101112131415...

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 3, 4, 5, 2, 6, 2, 7, 2, 8, 2, 9, 2, 10, 2, 11, 2, 12, 2, 3, 3, 4, 13, 5, 6, 7, 3, 8, 3, 9, 3, 10, 3, 11, 3, 12, 3, 13, 3, 4, 4, 5, 14, 6, 14, 7, 8, 9, 4, 10, 4, 11, 4, 12, 4, 13, 4, 14, 4, 5, 5, 6, 15, 7, 15, 8, 15, 9, 10, 11, 5, 12, 5, 13, 5, 14, 5, 15, 5, 6, 6

Offset

0,11

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Prog

(Haskell)
a065648 n = a065648_list !! n
a065648_list = f (0 : a033307_list) $ take 10 $ repeat 1 where
   f (d:ds) counts = y : f ds (xs ++ (y + 1) : ys) where
                           (xs, y:ys) = splitAt d counts
-- Reinhard Zumkeller, Aug 13 2015

Crossrefs

Cf. A033307, A065649, A065650.

Cf. A256100.

Sequence in context: A328629 A342022 A226078 * A305977 A329048 A167506

Adjacent sequences: A065645 A065646 A065647 * A065649 A065650 A065651

Keyword

base,nonn,look

Author

Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Nov 09 2001

Extensions

Definition and offset adjusted to follow a later change of A033307. - Reinhard Zumkeller, Aug 13 2015

Status

approved