|
|
A084431
|
|
Expansion of (1 + 6*x + 5*x^2)/((1-2*x)*(1+2*x)).
|
|
2
|
|
|
1, 6, 9, 24, 36, 96, 144, 384, 576, 1536, 2304, 6144, 9216, 24576, 36864, 98304, 147456, 393216, 589824, 1572864, 2359296, 6291456, 9437184, 25165824, 37748736, 100663296, 150994944, 402653184, 603979776, 1610612736, 2415919104
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
a(n) = (-10*0^n - 3*(-2)^n + 21*2^n)/8.
|
|
MATHEMATICA
|
CoefficientList[Series[(1+6x+5x^2)/((1-2x)(1+2x)), {x, 0, 30}], x] (* or *) Join[{1}, Flatten[NestList[4#&, {6, 9}, 15]]] (* Harvey P. Dale, Nov 05 2011 *)
|
|
PROG
|
(Magma) [(-10*0^n-3*(-2)^n+21*2^n)/8: n in [0..30]]; // Vincenzo Librandi, Nov 16 2011
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|