login
A114982
Expansion of x(3-x^2)/(1-3x).
0
0, 3, 9, 26, 78, 234, 702, 2106, 6318, 18954, 56862, 170586, 511758, 1535274, 4605822, 13817466, 41452398, 124357194, 373071582, 1119214746, 3357644238, 10072932714, 30218798142, 90656394426, 271969183278, 815907549834
OFFSET
0,2
MAPLE
G:=x*(3-x^2)/(1-3*x): Gser:=series(G, x=0, 30): seq(coeff(Gser, x, n), n=0..28);
MATHEMATICA
p[x_] = x*(x^2 - 3)/(3*x - 1) b = Flatten[{{0}, Abs[Table[Coefficient[Series[x*(x^2 - 3)/(3*x - 1), {x, 0, 30}], x^n], {n, 1, 30}]]}]
CROSSREFS
Sequence in context: A119826 A027915 A295115 * A133405 A368088 A196952
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Feb 27 2006
EXTENSIONS
Entry revised by N. J. A. Sloane, Mar 28 2006
STATUS
approved