|
|
|
|
0, 8, 256, 4608, 65536, 819200, 9437184, 102760448, 1073741824, 10871635968, 107374182400, 1039382085632, 9895604649984, 92908732547072, 862017116176384, 7916483719987200, 72057594037927936, 650770146155036672
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(1) = 1^2 * 8^1 = 1 * 8 = 8.
a(2) = 2^2 * 8^2 = 4 * 64 = 256.
a(3) = 3^2 * 8^3 = 9 * 512 = 4608.
|
|
MATHEMATICA
|
LinearRecurrence[{24, -192, 512}, {0, 8, 256}, 30] (* or *) CoefficientList[Series[8 x (1 + 8 x)/((1 - 8 x)^3), {x, 0, 30}], x] (* Vincenzo Librandi, Feb 06 2013 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|