OFFSET
1,3
COMMENTS
Sign diagram of generating sequence: +++-+-++--------...
2*x*(1-x-x^3-x^5+x^6)-x/(1+x) = x -x^2 -x^3 -x^4 -x^5 -x^6 +x^7 +x^8 -x^9 +x^10-+... = y <-> x= y +y^2 +3*y^3 +11*y^4 +45*y^5+... - R. J. Mathar, Jul 21 2023
MAPLE
Order := 80:
g := 2*x*(1-x-x^3-x^5+x^6)-x/(1+x) ;
solve(series(g, x)=y, x) :
convert(%, polynom) :
seq(coeff(%, y, i), i=0..Order-1) ; # R. J. Mathar, Jul 24 2023
PROG
(PARI) my(x='x+O('x^40)); Vec(serreverse(2*x*(1-x-x^3-x^5+x^6)-x/(1+x))) \\ Michel Marcus, Jul 21 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
NAME corrected by R. J. Mathar, Jul 21 2023
STATUS
approved