A131735 Period 6: repeat [0, 0, 1, 1, 1, 1].

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

Offset

0,1

Links

Table of n, a(n) for n=0..104.

Index entries for linear recurrences with constant coefficients, signature (1,-1,1,-1,1).

Formula

G.f.: -(x^2+1)*x^2/(x-1)/(x^2+x+1)/(x^2-x+1). - R. J. Mathar, Nov 14 2007

a(n) = 2/3-(1/2)*cos((1/3)*Pi*n)-(1/6)*3^(1/2)*sin((1/3)*Pi*n)-(1/6)*cos((2/3)*Pi*n)-(1/6)*3^(1/2)*sin((2/3)*Pi*n). - R. J. Mathar, Nov 15 2007

a(n) = A131719(n-1), n>0. - R. J. Mathar, Jun 13 2008

Mathematica

PadRight[{}, 120, {0, 0, 1, 1, 1, 1}] (* or *) LinearRecurrence[{1, -1, 1, -1, 1}, {0, 0, 1, 1, 1}, 120] (* Harvey P. Dale, Jun 17 2015 *)

Crossrefs

Cf. A131719.

Sequence in context: A238468 A111113 A095190 * A131736 A373254 A152228

Adjacent sequences: A131732 A131733 A131734 * A131736 A131737 A131738

Keyword

nonn

Author

Paul Curtz, Sep 19 2007

Status

approved