proposed
approved
proposed
approved
editing
proposed
a(n) = 1 - n^3.
approved
editing
(MAGMAMagma) [1-n^3: n in [0..50]]; // Vincenzo Librandi, Apr 29 2011
proposed
approved
editing
proposed
<a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1).
From G. C. Greubel, May 11 2017: (Start)
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4).
G.f.: (1 - 4*x - x^2 - 2*x^3)/(1 - x)^4.
E.g.f.: (1 - x - 3*x^2 - x^3)*exp(x). (End)
CoefficientList[Series[(1 - 4*x - x^2 - 2*x^3)/(1 - x)^4, {x, 0, 50}], x] (* G. C. Greubel, May 11 2017 *)
(PARI) x='x+O('x^50); Vec((1 - 4*x - x^2 - 2*x^3)/(1 - x)^4) \\ G. C. Greubel, May 11 2017
approved
editing
editing
approved
a(n) = 1-n^3.
Table[1 - n^3, {n, 0, 50}] (* Bruno Berselli, Jun 12 2015 *)
(MAGMA) [1-n^3: n in [0..50]]; // _Vincenzo Librandi, _, Apr 29 2011
(Maxima) A024001(n):=1-n^3$ makelist(A024001(n), n, 0, 30); /* _Martin Ettl_, Nov 05 2012 */
makelist(A024001(n), n, 0, 30); /* Martin Ettl, Nov 05 2012 */
sign,easy
approved
editing
proposed
approved