OFFSET
0,4
COMMENTS
Quasipolynomial with period 16. - Charles R Greathouse IV, Sep 06 2011
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (4,-5,0,4,0,-4,0,4,0,-4,0,4,0,-4,0,5,-4,1).
FORMULA
a(n) = floor( n*(n+2)*(n+4)*(n-6)/192).
a(n) = 4*a(n-1) - 5*a(n-2) + 4*a(n-4) - 4*a(n-6) + 4*a(n-8) - 4*a(n-10) + 4*a(n-12) - 4*a(n-14) + 5*a(n-16) - 4*a(n-17) + a(n-18).
MATHEMATICA
Table[Floor[n*(n+1)*(n+2)*(n-3)/12], {n, 0, 25, 1/2}]
LinearRecurrence[{4, -5, 0, 4, 0, -4, 0, 4, 0, -4, 0, 4, 0, -4, 0, 5, -4, 1}, {0, -1, -1, -2, -2, -2, 0, 3, 10, 20, 35, 55, 84, 120, 168, 227, 300, 388}, 50] (* Harvey P. Dale, Nov 02 2024 *)
PROG
(Magma) [Floor( n*(n+2)*(n+4)*(n-6)/192): n in [0..50]]; // Vincenzo Librandi, Sep 06 2011
(PARI) a(n)=n*(n+2)*(n+4)*(n-6)\192 \\ Charles R Greathouse IV, Sep 06 2011
(Sage) [floor(n*(n+2)*(n+4)*(n-6)/192) for n in (0..50)] # G. C. Greubel, May 20 2019
CROSSREFS
KEYWORD
sign,easy,changed
AUTHOR
Roger L. Bagula, Apr 11 2006
EXTENSIONS
More precise description, converted to a more regular signed sequence - the Assoc. Eds. of the OEIS, Jun 27 2010
STATUS
approved