A098538 Expansion of 1/((1-x)^3 - 18*x^4)^(1/3).

1, 1, 1, 1, 7, 25, 61, 121, 283, 841, 2521, 6769, 17119, 44665, 123685, 347497, 954787, 2578297, 7001617, 19307089, 53601175, 148305817, 408681997, 1127558041, 3124344427, 8681565865, 24127128841, 67020060721, 186282015823

Offset

0,5

Comments

Binomial transform of A098537.

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Mathematica

CoefficientList[Series[1/((1-x)^3-18*x^4)^(1/3), {x, 0, 50}], x] (* G. C. Greubel, Jan 17 2018 *)

Prog

(PARI) x='x+O('x^30); Vec(1/((1-x)^3-18*x^4)^(1/3)) \\ G. C. Greubel, Jan 17 2018
(Magma) Q:=Rationals(); R<x>:=PowerSeriesRing(Q, 30); Coefficients(R!(1/((1-x)^3-18*x^4)^(1/3))); // G. C. Greubel, Jan 17 2018

Crossrefs

Cf. A098536.

Sequence in context: A212136 A213392 A061600 * A033814 A321165 A344560

Adjacent sequences: A098535 A098536 A098537 * A098539 A098540 A098541

Keyword

easy,nonn

Author

Paul Barry, Sep 13 2004

Status

approved