OFFSET
0,3
LINKS
Robert Israel, Table of n, a(n) for n = 0..2416
Zhuang, Yan. A generalized Goulden-Jackson cluster method and lattice path enumeration, Discrete Mathematics 341.2 (2018): 358-379. Also arXiv: 1508.02793v2.
FORMULA
G.f.: (1-2*x+2*x^2-2*x^3-sqrt(1-4*x+4*x^2-4*x^4+4*x^5))/(2*(x^2-2*x^3+x^4)).
(6+4*n)*a(n)+(-14-8*n)*a(n+1)+(4*n+8)*a(2+n)+(4*n+24)*a(n+3)+(-50-8*n)*a(n+4)+(35+5*n)*a(n+5)+(-8-n)*a(n+6) = 0. - Robert Israel, Feb 08 2018
MAPLE
f := gfun:-rectoproc({(6+4*n)*a(n)+(-14-8*n)*a(n+1)+(4*n+8)*a(2+n)+(4*n+24)*a(n+3)+(-50-8*n)*a(n+4)+(35+5*n)*a(n+5)+(-8-n)*a(n+6), a(0) = 1, a(1) = 1, a(2) = 2, a(3) = 4, a(4) = 8, a(5) = 16}, a(n), remember):
map(f, [$0..100]); # Robert Israel, Feb 08 2018
MATHEMATICA
(1 - 2x + 2x^2 - 2x^3 - Sqrt[1 - 4x + 4x^2 - 4x^4 + 4x^5])/(2(x^2 - 2x^3 + x^4)) + O[x]^36 // CoefficientList[#, x]& (* Jean-François Alcover, Sep 14 2018, after Robert Israel *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 08 2018
STATUS
approved