login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A291379
p-INVERT of (1,1,0,0,0,0,...), where p(S) = 1 - S^4.
2
0, 0, 0, 1, 4, 6, 4, 2, 8, 28, 56, 71, 68, 94, 228, 497, 808, 1044, 1352, 2316, 4608, 8264, 12592, 17717, 26968, 47044, 83912, 138417, 211052, 319850, 517356, 881918, 1483336, 2377252, 3700648, 5853067, 9605596, 15991378, 26154700, 41734433, 66214096
OFFSET
0,5
COMMENTS
Suppose s = (c(0), c(1), c(2), ...) is a sequence and p(S) is a polynomial. Let S(x) = c(0)*x + c(1)*x^2 + c(2)*x^3 + ... and T(x) = (-p(0) + 1/p(S(x)))/x. The p-INVERT of s is the sequence t(s) of coefficients in the Maclaurin series for T(x). Taking p(S) = 1 - S gives the "INVERT" transform of s, so that p-INVERT is a generalization of the "INVERT" transform (e.g., A033453).
See A291382 for a guide to related sequences.
FORMULA
G.f.: -((x^3 (1 + x)^4)/((-1 + x + x^2) (1 + x + x^2) (1 + x^2 + 2 x^3 + x^4))).
a(n) = a(n-4) + 4*a(n-5) + 6*a(n-6) + 4*a(n-7) + a(n-8) for n >= 9.
MATHEMATICA
z = 60; s = x + x^2; p = (1 - s)^4;
Drop[CoefficientList[Series[s, {x, 0, z}], x], 1] (* A019590 *)
Drop[CoefficientList[Series[1/p, {x, 0, z}], x], 1] (* A291379 *)
CROSSREFS
Sequence in context: A135911 A164356 A181774 * A001138 A133587 A204693
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Sep 04 2017
STATUS
approved