OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
FORMULA
G.f.: (2*x^6 + 58*x^5 + 294*x^4 + 310*x^3 + 56*x^2)/(-x^7 + 7*x^6 - 21*x^5 + 35*x^4 - 35*x^3 + 21*x^2 - 7*x + 1). - Alexander R. Povolotsky, Apr 01 2008
a(n) = 2 * A085744(n). - Alois P. Heinz, Mar 15 2021
MAPLE
MATHEMATICA
a[n_]:=n^6-n^3; a[Range[0, 60]] (* Vladimir Joseph Stephan Orlovsky, Feb 10 2011 *)
CoefficientList[Series[(2 x^6 + 58 x^5 + 294 x^4 + 310 x^3 + 56 x^2)/(-x^7 + 7 x^6 - 21 x^5 + 35 x^4 - 35 x^3 + 21 x^2 - 7 x + 1), {x, 0, 40}], x] (* Vincenzo Librandi, Feb 16 2014 *)
PROG
(Magma) [n^6 - n^3: n in [0..40]]; // Vincenzo Librandi, Feb 16 2014
(PARI) a(n) = n^6 - n^3; \\ Joerg Arndt, Feb 16 2014
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Rolf Pleisch, Mar 16 2008
EXTENSIONS
Extended by Ray Chandler, Dec 13 2008
STATUS
approved