This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A118270 Decimal expansion of Kolakoski constant. 1
 7, 9, 4, 5, 0, 7, 1, 9, 2, 7, 7, 9, 4, 7, 9, 2, 7, 6, 2, 4, 0, 3, 6, 2, 4, 1, 5, 6, 3, 6, 0, 4, 5, 6, 4, 6, 2, 9, 8, 5, 7, 7, 1, 0, 0, 9, 8, 8, 6, 0, 6, 9, 6, 7, 2, 6, 5, 8, 8, 6, 7, 3, 7, 1, 5, 3, 8, 1, 4, 7, 7, 5, 0, 2, 4, 6, 0, 5, 0, 1, 5, 3, 6, 4, 2, 3, 2, 9, 4, 9, 7, 3, 1, 8, 7, 4, 4, 9, 2, 2, 5, 9, 7, 6, 5 (list; constant; graph; refs; listen; history; text; internal format)
 OFFSET 0,1 LINKS Rabie A. Mahmoud, Hardware Implementation of Binary Kolakoski Sequence, Research Gate, 2015. Eric Weisstein's World of Mathematics, Kolakoski Sequence FORMULA Take the Kolakoski sequence (A000002) 1221121221.... Interpret the 2's as 1's and the 1's as 0's: 0110010110.... Interpret the result as a binary fraction: 0.110010110..._2. EXAMPLE 0.7945071927794792762... MATHEMATICA A000002[n_] := (s = {1, 2, 2}; Do[AppendTo[s, Mod[k-1, 2] + 1], {k, 3, n}, {s[[k]]}] ; s); Take[ First[ RealDigits[ FromDigits[ {Rest[A000002[300] /. {1 -> 0, 2 -> 1}], 0}, 2]]], 105] (* Jean-François Alcover, Jul 28 2011 *) CROSSREFS Cf. A000002. Sequence in context: A102375 A216754 A303296 * A179292 A198756 A140899 Adjacent sequences:  A118267 A118268 A118269 * A118271 A118272 A118273 KEYWORD nonn,cons AUTHOR Eric W. Weisstein, Apr 21 2006 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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 16 00:25 EDT 2018. Contains 313782 sequences. (Running on oeis4.)