OFFSET
1,1
EXAMPLE
.n ..... Run ....................... Length
.1 ..... 1,1 ....................... 2
.2 ..... 0,0,0 ..................... 3
.3 ..... 1,1,1,1,1 ................. 5
.4 ..... 0,0,0,0,0,0,0 ............. 7
.5 ..... 1,1,1,1,1,1,1,1,1,1,1 ..... 11
MATHEMATICA
Flatten[Table[{Table[1, {Prime[n]}], Table[0, {Prime[n+1]}]}, {n, 1, 11, 2}]] (* Harvey P. Dale, Jan 25 2013 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Mar 29 2008
STATUS
approved