A212341 Sequence of coefficients of x in marked mesh pattern generating function Q_{n,132}^(0,0,4,0)(x).

14, 56, 188, 603, 1907, 5615, 15968, 44464, 121693, 326937, 866104, 2268739, 5884632, 15127516, 38589364, 97776517, 246248849, 616795067, 1537351460, 3814809145, 9427784176, 23213028624, 56960216422, 139330244662, 339825250768, 826596931346

Offset

5,1

Links

Table of n, a(n) for n=5..30.

S. Kitaev, J. Remmel and M. Tiefenbruck, Marked mesh patterns in 132-avoiding permutations I, arXiv preprint arXiv:1201.6243, 2012

Formula

Empirical g.f.: -x^5*(25*x^3+20*x^2+14*x+14) / (5*x^4+2*x^3+x^2+x-1)^3. - Colin Barker, Jul 22 2013

Mathematica

QQQ4[t, x] = 2/(1+(t*x-t)*(1+t+2*t^2+5*t^3)+((1+(t*x-t)*(1+t+2*t^2+5*t^3))^2-4*t*x)^(1/2)); CoefficientList[Coefficient[Series[QQQ4[t, x], {t, 0, 22}], x], t] (* Robert Price, Jun 05 2012 *)

Crossrefs

Sequence in context: A212347 A115129 A281200 * A067326 A202242 A041374

Adjacent sequences: A212338 A212339 A212340 * A212342 A212343 A212344

Keyword

nonn

Author

N. J. A. Sloane, May 09 2012

Extensions

a(10)-a(22) from Robert Price, Jun 04 2012

Status

approved