A174784 Expansion of x*(1-x+x^3+x^4)/(1+x^6) (Period 12).

0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1, 0, 1, -1, 0, 1, 1, 0

Offset

0,1

Comments

Hankel transform of A174783 is -a(n).

Links

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

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

Formula

a(n) = -cos(5*Pi*n/6)/3 + sin(5*Pi*n/6)/3 - cos(Pi*n/6)/3 + sin(Pi*n/6)/3 + 2*cos(Pi*n/2)/3 + 2*sin(Pi*n/2)/3.

G.f.: x*(1-x+x^3+x^4) / ( (1+x^2)*(x^4-x^2+1) ). - R. J. Mathar, Feb 10 2015

Mathematica

LinearRecurrence[{0, 0, 0, 0, 0, -1}, {0, 1, -1, 0, 1, 1}, 100] (* or *) PadRight[ {}, 120, {0, 1, -1, 0, 1, 1, 0, -1, 1, 0, -1, -1}] (* Harvey P. Dale, Feb 25 2017 *)

Crossrefs

Sequence in context: A284792 A094217 A280261 * A092220 A011655 A102283

Adjacent sequences: A174781 A174782 A174783 * A174785 A174786 A174787

Keyword

easy,sign

Author

Paul Barry, Mar 29 2010

Status

approved