A114607 Start with 1 0 1 0 then add a one every time (e.g. 1 1 0 1 1 1 0 1 1 1 1 0 ...).

1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset

1,1

Links

Table of n, a(n) for n=1..105.

Formula

a(n)=A023532(n-2), n>1. [From R. J. Mathar, Aug 11 2008]

Mathematica

Flatten[Join[{1, 0}, Table[Join[PadRight[{}, n, 1], {0}], {n, 20}]]] (* Harvey P. Dale, Dec 23 2012 *)

Crossrefs

Cf. A073424.

Essentially the same sequence as A023532 and A123110. - N. J. A. Sloane, Feb 07 2020

Sequence in context: A177978 A213061 A110247 * A123110 A004593 A094934

Adjacent sequences: A114604 A114605 A114606 * A114608 A114609 A114610

Keyword

nonn

Author

Dan M. Smith (SmittyDa33(AT)yahoo.com), Dec 14 2005

Status

approved