The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A056062 Run lengths in infinite binary Champernowne string (A030190) formed by concatenation of 0, 1, 2 ... in base 2. 5
 1, 2, 1, 3, 2, 1, 1, 3, 1, 4, 3, 1, 2, 2, 1, 1, 1, 1, 1, 4, 2, 2, 1, 4, 1, 5, 4, 1, 3, 2, 2, 1, 1, 1, 2, 3, 1, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 5, 3, 2, 2, 3, 1, 1, 1, 2, 1, 5, 2, 3, 1, 5, 1, 6, 5, 1, 4, 2, 3, 1, 1, 1, 3, 3, 2, 1, 2, 1, 2, 1, 1, 2, 2, 2, 1, 1, 2, 4, 1, 1, 3, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 LINKS Reinhard Zumkeller, Table of n, a(n) for n = 0..10000 EXAMPLE The string starts with 011011100101110111... (concatenation of 0, 1, 10, 11, 100, 101, 110, 111, ...) so initial runs are 1, 2, 1, 3, ... MATHEMATICA Length /@ (Split@(Join @@ Table[ IntegerDigits[i, 2], {i, 0, 100}]))  (*  Olivier Gérard, Mar 27 2011 *) Length/@Split[Flatten[IntegerDigits[Range[0, 50], 2]]] (* Harvey P. Dale, May 24 2015 *) PROG (Haskell) import Data.List (group) a056062 n = a056062_list !! n a056062_list = map length \$ group a030190_list -- Reinhard Zumkeller, Mar 26 2013 CROSSREFS Cf. A030190, A003607, A030306, A318924. Sequence in context: A322027 A088192 A218459 * A230517 A165003 A165011 Adjacent sequences:  A056059 A056060 A056061 * A056063 A056064 A056065 KEYWORD easy,nonn,nice,base AUTHOR Helge Robitzsch (hrobi(AT)math.uni-goettingen.de), Jul 27 2000 EXTENSIONS Edited by Charles R Greathouse IV, Apr 26 2010 Data corrected for n > 44 by Reinhard Zumkeller, Mar 26 2013 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified February 21 19:02 EST 2020. Contains 332109 sequences. (Running on oeis4.)