OFFSET
0,5
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (2,-1,0,0,0,0,1,-2,1).
FORMULA
a(n) = +2*a(n-1) -a(n-2) +a(n-7) -2*a(n-8) +a(n-9).
G.f.: -x^3*(1+x)*(x^2-x+1) / ( (x^6+x^5+x^4+x^3+x^2+x+1)*(x-1)^3 ).
MATHEMATICA
Floor[(Range[0, 60]^2)/7] (* or *) LinearRecurrence[{2, -1, 0, 0, 0, 0, 1, -2, 1}, {0, 0, 0, 1, 2, 3, 5, 7, 9}, 60] (* Harvey P. Dale, Jul 21 2014 *)
CoefficientList[Series[-x^3 (1 + x) (x^2 - x + 1)/((x^6 + x^5 + x^4 + x^3 + x^2 + x + 1) (x - 1)^3), {x, 0, 100}], x] (* Vincenzo Librandi, Jul 22 2014 *)
PROG
(PARI) a(n) = n^2\7; \\ Michel Marcus, Mar 03 2022
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Sep 02 2000
STATUS
approved