OFFSET
0,3
LINKS
Index entries for linear recurrences with constant coefficients, signature (3, 2, -9, 2, 3, -1).
FORMULA
Let phi = (1+sqrt(5))/2, p(n) = phi^n - (-phi)^(-n) and FL(n) = 1 + (p(n-1) + p(n+1) + p(2*n-1)) / sqrt(5).
a(n) = FL(-n) - FL(n). By this definition a(n) is a doubly infinite sequence.
a(n) = -a(-n) for all n in Z.
a(2*n) = A033888(n).
G.f.: x/(x^2-3*x+1) + x/(x^2-x-1) + x/(x^2+x-1).
a(n) = 4*a(n-1) - a(n-2) - 11*a(n-3) + 11*a(n-4) + a(n-5) - 4*a(n-6) + a(n-7).
MAPLE
gf := x -> x/(x^2-3*x+1) + x/(x^2-x-1) + x/(x^2+x-1):
seq(coeff(series(gf(x), x, n+1), x, n), n=0..30);
MATHEMATICA
LinearRecurrence[{4, -1, -11, 11, 1, -4, 1}, {0, -1, 3, 4, 21, 45, 144}, 31]
LinearRecurrence[{3, 2, -9, 2, 3, -1}, {0, -1, 3, 4, 21, 45}, 31] (* Ray Chandler, Aug 03 2015 *)
PROG
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Peter Luschny, Mar 09 2015
STATUS
approved