A243699 Number of meta-Sylvester classes of 5-multiparking functions of length n.

1, 1, 7, 90, 1679, 40977, 1234002, 44162294, 1829650545, 86075951647, 4530650659261, 263702502327536, 16811827814422092, 1164790943838593160, 87124861733813622130, 6995992413536990011830, 600147439879762402873285, 54768109160914827946501375, 5297131818511043862499262665

Offset

0,3

Comments

See Novelli-Thibon (2014) for precise definition.

Links

Table of n, a(n) for n=0..18.

J.-C. Novelli, J.-Y. Thibon, Hopf Algebras of m-permutations, (m+1)-ary trees, and m-parking functions, arXiv preprint arXiv:1403.5962 [math.CO], 2014. See Fig. 28.

Formula

G.f.: 1/(1-x) = Sum_{n>=0} a(n) * x^n*(1-x)^n / Product_{k=1..n} (1 + 5*k*x). - Paul D. Hanna, Jun 14 2014

Mathematica

a[n_] := a[n] = If[n<0, 0, Coefficient[1/(1 - x + x O[x]^n) - Sum[a[k] x^k (1-x)^k/Product[1 + 5 j x + x O[x]^n, {j, 0, k}], {k, 1, n-1}], x, n]];
Table[a[n], {n, 0, 20}] (* Jean-François Alcover, Jul 27 2018, after Paul D. Hanna *)

Prog

(PARI) {a(n)=if(n<0, 0, polcoeff(1/(1-x+x*O(x^n)) - sum(k=1, n-1, a(k)*x^k*(1-x)^k/prod(j=0, k, 1+5*j*x+x*O(x^n))), n))}
for(n=0, 20, print1(a(n), ", ")) \\ Paul D. Hanna, Jun 14 2014

Crossrefs

Cf. A132624, A243696, A243697, A243698.

Sequence in context: A355591 A360914 A321164 * A007820 A306137 A226624

Adjacent sequences: A243696 A243697 A243698 * A243700 A243701 A243702

Keyword

nonn

Author

N. J. A. Sloane, Jun 14 2014

Extensions

Offset changed to 0 by Paul D. Hanna, Jun 14 2014

Status

approved