OFFSET
1,3
COMMENTS
Sign diagram of generating sequence: +---++++-+-+-+-+-+-+...
MAPLE
Order := 80:
g := 2*x*(1-x-x^3+x^4+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) a(n)=if(n<1, 0, polcoeff(serreverse(x*(1-2*x^2*(1+x-x^3-x^4-x^5)+O(x^n))/(1+x)), n))
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved