login
A054136
a(n) = T(n,2), array T as in A054134.
0
2, 6, 18, 46, 107, 235, 498, 1032, 2109, 4273, 8612, 17302, 34695, 69495, 139110, 278356, 556865, 1113901, 2227992, 4456194, 8912619, 17825491, 35651258, 71302816, 142605957, 285212265, 570424908, 1140850222, 2281700879
OFFSET
2,1
FORMULA
G.f.: x^2(x^4-4x^3+6x^2-4x+2)/[(1-2x)(1-x)^3].
MATHEMATICA
Drop[CoefficientList[Series[x^2(x^4-4x^3+6x^2-4x+2)/((1-2x)(1-x)^3), {x, 0, 30}], x], 2] (* or *) LinearRecurrence[{5, -9, 7, -2}, {2, 6, 18, 46, 107}, 40] (* Harvey P. Dale, Mar 29 2024 *)
CROSSREFS
Cf. A054134.
Sequence in context: A251685 A341490 A308305 * A232600 A140960 A072827
KEYWORD
nonn,easy
STATUS
approved