login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A156174 Period 5: repeat [1,-1,1,-1,0]. 6
1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0, 1, -1, 1, -1, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

COMMENTS

C(n) := a(n+4) appears in the formula 2*exp(2*Pi*n*i/5) = (A(n) + B(n)*phi) + (C(n) + D(n)*phi)*sqrt(2 + phi)*i, with the golden section phi, i = sqrt(-1) and A(n) = A164116(n+5), B(n) = A080891(n) and D(n) = A010891(n+3) for n >= 0. See a comment on A164116(n+5). - Wolfdieter Lang, Feb 26 2014

With offset 1 this is a strong elliptic divisibility sequence t_n as given in [Kimberling, p. 16] where x = -1, y = 1, z = 1. - Michael Somos, Oct 17 2018

REFERENCES

Arthur Gill, Linear Sequential Circuits, McGraw-Hill, 1966, Eq. (17-10).

LINKS

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

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

C. Kimberling, Strong divisibility sequences and some conjectures, Fib. Quart., 17 (1979), 13-17.

FORMULA

G.f.: (1+x^2)/(1 + x + x^2 + x^3 + x^4).

a(n) = -(1/5)*((n mod 5)+((n+1) mod 5) - 2*((n+2) mod 5) + 2*((n+3) mod 5) - 2*((n+4) mod 5)). - Paolo P. Lava, Nov 12 2009

Sum_{i=0..n} a(i) = A198517(n). - Bruno Berselli, Nov 02 2011

From Wesley Ivan Hurt, May 31 2015: (Start)

a(n) + a(n-1) + a(n-2) + a(n-3) + a(n-4) = 0 for n > 4.

a(n) = Sum_{i=0..3} A011558(n+2+i)*(-1)^i. (End)

Euler transform of length 5 sequence [-1, 1, 0, -1, 1]. - Michael Somos, Jun 17 2015

G.f.: (1-x)*(1-x^4)/((1-x^2)*(1-x^5)). - Michael Somos, Jun 17 2015

a(n) = -a(-2-n) = a(n+5) for all n in Z. - Michael Somos, Jun 17 2015

a(n) = (2/5) * (cos(4*(n-2)*Pi/5) + cos(2*n*Pi/5) + cos(4*n*Pi/5) - cos(2*(n-3)*Pi/5) - cos(4*(n-3)*Pi/5) - cos(2*(n-1)*Pi/5) - cos(4*(n-1)*Pi/5) - cos((2*n+1)*Pi/5)). - Wesley Ivan Hurt, Sep 26 2018

a(n) = (-1)^n * A099443(n). - Michael Somos, Oct 17 2018

EXAMPLE

G.f. = 1 - x + x^2 - x^3 + x^5 - x^6 + x^7 - x^8 + x^10 - x^11 + x^12 + ...

MAPLE

A156174:=n->[1, -1, 1, -1, 0][(n mod 5)+1]: seq(A156174(n), n=0..100); # Wesley Ivan Hurt, May 31 2015

MATHEMATICA

CoefficientList[Series[(1 + x^2)/(1 + x + x^2 + x^3 + x^4), {x, 0, 100}], x] (* Wesley Ivan Hurt, May 31 2015 *)

a[ n_] := { -1, 1, -1, 0, 1}[[Mod[n, 5, 1]]]; (* Michael Somos, Jun 17 2015 *)

a[ n_] := (-1)^Mod[n, 5] Sign @ Mod[n + 1, 5]; (* Michael Somos, Jun 17 2015 *)

PROG

(PARI) a(n)=[1, -1, 1, -1, 0][n%5+1] \\ Charles R Greathouse IV, Oct 28 2011

(PARI) {a(n) = (-1)^(n%5) * sign((n+1)%5)}; /* Michael Somos, Jun 17 2015 */

CROSSREFS

Cf. A010874, A011558 (this read mod 2), A099443, A198517.

Sequence in context: A292301 A099443 A132342 * A187967 A106467 A106468

Adjacent sequences:  A156171 A156172 A156173 * A156175 A156176 A156177

KEYWORD

sign,easy

AUTHOR

N. J. A. Sloane, Nov 06 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 26 15:13 EDT 2019. Contains 323596 sequences. (Running on oeis4.)