OFFSET
0,4
LINKS
Robert Israel, Table of n, a(n) for n = 0..1593
FORMULA
G.f. g(x) satisfies g(x) + g(x)^2 - g(x)^5 - g(x)^6 - g(x)^7 = x with g(0)=0. - Robert Israel, Feb 08 2017
MAPLE
S:= series(RootOf(x+x^2-x^5-x^6-x^7=y, x), y, 51):
seq(coeff(S, y, j), j=0..50); # Robert Israel, Feb 08 2017
MATHEMATICA
CoefficientList[InverseSeries[t+t^2-t^5-t^6-t^7 + O[t]^28, t], t]
PROG
(Sage)
R.<t> = PowerSeriesRing(ZZ)
q = (t+t^2-t^5-t^6-t^7).O(28)
print(q.reverse().list())
(PARI) concat(0, Vec(serreverse(x + x^2 - x^5 - x^6 - x^7 + O(x^30)))) \\ Michel Marcus, Jan 01 2017
CROSSREFS
KEYWORD
sign
AUTHOR
Peter Luschny, Jan 01 2017
STATUS
approved