|
|
|
|
0, 1, 2, 7, 36, 173, 806, 3763, 17608, 82393, 385482, 1803487, 8437740, 39476613, 184694254, 864105611, 4042781584, 18914450865, 88492648850, 414019362743, 1937020023220, 9062490569821, 42399528318646, 198369310046307, 928085399264344
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 5*a(n-1) - 3*a(n-2) + 7*a(n-3).
|
|
MATHEMATICA
|
LinearRecurrence[{5, -3, 7}, {0, 1, 2}, 30] (* G. C. Greubel, Jan 03 2019 *)
|
|
PROG
|
(PARI) my(x='x+O('x^30)); concat([0], Vec(x*(1-3*x)/(1-5*x+3*x^2-7*x^3))) \\ G. C. Greubel, Jan 03 2019
(Magma) m:=30; R<x>:=PowerSeriesRing(Integers(), m); [0] cat Coefficients(R!( x*(1-3*x)/(1-5*x+3*x^2-7*x^3) )); // G. C. Greubel, Jan 03 2019
(Sage) (x*(1-3*x)/(1-5*x+3*x^2-7*x^3)).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Jan 03 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|