OFFSET
1,1
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (-1,-1,-1,2,2,2,2,-1,-1,-1,-1).
FORMULA
a(2*n+1) + a(2*n+2) = 8*n.
G.f. ( x*(2+3*x^2+8*x^3+24*x^5+24*x^7+8*x^9-4*x^6+6*x^8+3*x^10) ) / ( (x-1)^2*(1+x)^3*(x^2+1)^3 ). - R. J. Mathar, Feb 16 2011
a(n) = -a(n-1) -a(n-2) -a(n-3) +2*a(n-4) +2*a(n-5) +2*a(n-6) +2*a(n-7) -a(n-8) -a(n-9) -a(n-10) -a(n-11).
a(n)=3*a(n-4) -3*a(n-8) +a(n-12). - Paul Curtz, Feb 17 2011
a(4n) + a(4n+1) +a(4n+2) +a(4n+3) = 2*n = A005843(n). - Paul Curtz, Feb 17 2011
MAPLE
A060819 := proc(n) n/igcd(n, 4) ; end proc:
A185688 := proc(n) A185688b(n+1)-A185688b(n) ; end proc: # R. J. Mathar, Feb 16 2011
MATHEMATICA
Rest[CoefficientList[Series[(x*(2 + 3*x^2 + 8*x^3 + 24*x^5 + 24*x^7 + 8*x^9 - 4*x^6 + 6*x^8 + 3*x^10))/((x - 1)^2*(1 + x)^3*(x^2 + 1)^3), {x, 0, 50}], x]] (* G. C. Greubel, Jul 10 2017 *)
LinearRecurrence[{-1, -1, -1, 2, 2, 2, 2, -1, -1, -1, -1}, {2, -2, 3, 5, -2, 18, -19, 43, -30, 62, -71}, 40] (* Harvey P. Dale, Oct 03 2023 *)
PROG
(PARI) Vec((2+3*x^2+8*x^3+24*x^5+24*x^7+8*x^9-4*x^6+6*x^8+3*x^10)/(x-1)^2/(1+x)^3/(x^2+1)^3+O(x^99)) \\ Charles R Greathouse IV, Feb 08 2012
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Paul Curtz, Feb 10 2011
STATUS
approved