OFFSET
0,5
LINKS
Joerg Arndt and Alois P. Heinz, Table of n, a(n) for n = 0..1000
FORMULA
G.f.: x^3*(x+1)/((x^2+x-1)*(x^4+x^3+x^2+x-1)).
EXAMPLE
a(3) = 1: 321.
a(4) = 3: 1432, 3214, 3412.
a(5) = 7: 12543, 14325, 14523, 21543, 32145, 32154, 34125.
a(6) = 16: 123654, 125436, 125634, 132654, 143256, 143265, 145236, 213654, 215436, 215634, 321456, 321465, 321546, 321654, 341256, 341265.
MAPLE
gf:= x^3*(1+x)/((x^2+x-1)*(x^4+x^3+x^2+x-1)):
a:= n-> coeff(series(gf, x, n+1), x, n):
seq(a(n), n=0..40);
MATHEMATICA
CoefficientList[Series[x^3 (x + 1)/((x^2 + x - 1) (x^4 + x^3 + x^2 + x - 1)), {x, 0, 40}], x] (* Vincenzo Librandi, Mar 09 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Joerg Arndt and Alois P. Heinz, Mar 07 2014
STATUS
approved