login
n-th run has length n-th prime, with values 0 and 1 only, starting with 1.
6

%I #8 Jan 25 2013 12:24:46

%S 1,1,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,

%T 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,

%U 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,1,1,1,1

%N n-th run has length n-th prime, with values 0 and 1 only, starting with 1.

%e .n ..... Run ....................... Length

%e .1 ..... 1,1 ....................... 2

%e .2 ..... 0,0,0 ..................... 3

%e .3 ..... 1,1,1,1,1 ................. 5

%e .4 ..... 0,0,0,0,0,0,0 ............. 7

%e .5 ..... 1,1,1,1,1,1,1,1,1,1,1 ..... 11

%t Flatten[Table[{Table[1,{Prime[n]}],Table[0,{Prime[n+1]}]},{n,1,11,2}]] (* _Harvey P. Dale_, Jan 25 2013 *)

%Y Cf. A000040, A057211.

%K easy,nonn

%O 1,1

%A _Omar E. Pol_, Mar 29 2008