|
|
A331190
|
|
Expansion of (-5*(9 - 6*x + 2*x^2))/(-1 + x)^3.
|
|
0
|
|
|
45, 105, 190, 300, 435, 595, 780, 990, 1225, 1485, 1770, 2080, 2415, 2775, 3160, 3570, 4005, 4465, 4950, 5460, 5995, 6555, 7140, 7750, 8385, 9045, 9730, 10440, 11175, 11935, 12720, 13530, 14365, 15225, 16110, 17020, 17955, 18915, 19900, 20910, 21945, 23005, 24090
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n > 0, with a(0) = 0, a(1) = 45, a(2) = 105.
G.f.: (-5*(9 - 6*x + 2*x^2))/(-1 + x)^3.
|
|
MATHEMATICA
|
{0}~Join~LinearRecurrence[{3, -3, 1}, {45, 105, 190}, 43] (* or *)
CoefficientList[Series[(-5 (9 - 6 x + 2 x^2))/(-1 + x)^3, {x, 0, 42}], x]
|
|
PROG
|
(Magma) R<x>:=PowerSeriesRing(Integers(), 45); Coefficients(R!( (-5*(9 - 6*x + 2*x^2))/(-1 + x)^3)); // Marius A. Burtea, Jan 11 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|