|
|
A127960
|
|
a(n) = n^2*3^n.
|
|
1
|
|
|
0, 3, 36, 243, 1296, 6075, 26244, 107163, 419904, 1594323, 5904900, 21434787, 76527504, 269440587, 937461924, 3228504075, 11019960576, 37321507107, 125524238436, 419576389587, 1394713760400, 4613015762523, 15188432850756
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
LinearRecurrence[{9, -27, 27}, {0, 3, 36}, 25] (* or *) CoefficientList[ Series[3*x(1 + 3*x)/(1 - 3*x)^3, {x, 0, 30}], x] (* Vincenzo Librandi, Feb 07 2013 *)
|
|
PROG
|
(PARI) for(n=0, 30, print1(n^2*3^n, ", ")) \\ G. C. Greubel, May 04 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|