A131735 - OEIS

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

(list; graph; refs; listen; history; text; internal format)

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 *)