login
First differences of A080353.
1

%I #5 Dec 08 2019 13:34:49

%S 2,2,2,1,2,1,2,1,2,1,1,2,1,1,2,1,1,2,1,1,1,2,1,1,1,2,1,1,1,2,1,1,1,1,

%T 2,1,1,1,1,2,1,1,1,1,2,1,1,1,1,1,2,1,1,1,1,1,2,1,1,1,1,1,2,1,1,1,1,1,

%U 1,2,1,1,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1

%N First differences of A080353.

%F Runs are 2^2, (2 1)^3, (2 1 1)^3, (2 1 1 1)^3, ...

%t Most[Table[#,3]&/@Table[PadRight[{2},n,1],{n,10}]//Flatten] (* _Harvey P. Dale_, Dec 08 2019 *)

%K nonn

%O 0,1

%A _N. J. A. Sloane_, Mar 20 2003