OFFSET
0,1
FORMULA
Runs are 2^2, (2 1)^3, (2 1 1)^3, (2 1 1 1)^3, ...
MATHEMATICA
Most[Table[#, 3]&/@Table[PadRight[{2}, n, 1], {n, 10}]//Flatten] (* Harvey P. Dale, Dec 08 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 20 2003
STATUS
approved