A138150 n-th run has length n-th prime, with digits 0 and 1 only, starting with 0.

0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset

1,1

Links

Table of n, a(n) for n=1..77.

Example

.n ..... Run ....................... Length
.1 ..... 0,0 ....................... 2
.2 ..... 1,1,1 ..................... 3
.3 ..... 0,0,0,0,0 ................. 5
.4 ..... 1,1,1,1,1,1,1 ............. 7
.5 ..... 0,0,0,0,0,0,0,0,0,0,0 ..... 11

Mathematica

With[{nn=11}, Riffle[Table[PadRight[{}, Prime[n], 0], {n, 1, nn, 2}], Table[ PadRight[ {}, Prime[n+1], 1], {n, 1, nn, 2}]]//Flatten] (* Harvey P. Dale, Nov 28 2018 *)

Crossrefs

Cf. A000040, A057212.

Sequence in context: A014306 A374220 A335716 * A271591 A287790 A285159

Adjacent sequences: A138147 A138148 A138149 * A138151 A138152 A138153

Keyword

easy,nonn

Author

Omar E. Pol, Mar 29 2008

Status

approved