|
| |
|
|
A138150
|
|
n-th run has length n-th prime, with digits 0 and 1 only, starting with 0.
|
|
4
|
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
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: A180433 A165560 A014306 * A271591 A287790 A285159
Adjacent sequences: A138147 A138148 A138149 * A138151 A138152 A138153
|
|
|
KEYWORD
|
easy,nonn
|
|
|
AUTHOR
|
Omar E. Pol, Mar 29 2008
|
|
|
STATUS
|
approved
|
| |
|
|
