|
|
|
|
0, 4, 128, 1728, 16384, 128000, 884736, 5619712, 33554432, 191102976, 1048576000, 5582618624, 28991029248, 147438174208, 736586891264, 3623878656000, 17592186044416, 84404697300992, 400771988324352, 1885387563728896
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
All terms are congruent to {0, 2, 4} mod 6 (or mod 9 or mod 18). [Bruno Berselli, Feb 07 2013]
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
CoefficientList[Series[4*x*(1 + 16*x + 16*x^2)/(1 - 4*x)^4, {x, 0, 30}], x] (* Vincenzo Librandi, Feb 07 2013 *)
Table[n^3 4^n, {n, 0, 20}] (* or *) LinearRecurrence[{16, -96, 256, -256}, {0, 4, 128, 1728}, 20] (* Harvey P. Dale, Nov 24 2022 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|