OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (8,-24,32,-16).
FORMULA
G.f.: 4*x*(1 + 2*x + 4*x^2)/(1 - 2*x)^4. - Vincenzo Librandi, Feb 22 2013
E.g.f.: 4*x*(1 + 3*x + 2*x^2)*exp(2*x). - G. C. Greubel, Mar 04 2019
MAPLE
[(n^3+n)*2^n$n=1..30]; # Muniru A Asiru, Mar 04 2019
MATHEMATICA
Table[(n^3 + n)*2^n, {n, 30}] (* or *) CoefficientList[Series[4(1 +2x + 4x^2)/(1-2x)^4, {x, 0, 30}], x] (* Vincenzo Librandi, Feb 22 2013 *)
PROG
(Magma) [(n^3 + n)*2^n: n in [1..30]]; // Vincenzo Librandi, Feb 22 2013
(GAP) List([1..30], n->n*(n^2+1)*2^n); # Muniru A Asiru, Mar 04 2019
(PARI) {a(n) = n*(1+n^2)*2^n}; \\ G. C. Greubel, Mar 04 2019
(Sage) [n*(1+n^2)*2^n for n in (1..30)] # G. C. Greubel, Mar 04 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Mohammad K. Azarian, May 02 2007
STATUS
approved