cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

User: Jakub Sliacan

Jakub Sliacan's wiki page.

Jakub Sliacan has authored 1 sequences.

A278301 Number of permutations of length n in the class of juxtapositions of 321-avoiders with 21-avoiders.

Original entry on oeis.org

1, 1, 2, 6, 23, 98, 434, 1949, 8803, 39888, 181201, 825201, 3767757, 17249560, 79191480, 364585230, 1683208515, 7792546040, 36174065285, 168367375735, 785637327745, 3674914227120, 17230132657815, 80965662243526, 381275131584373, 1799105397745998
Offset: 0

Author

Jakub Sliacan, Nov 17 2016

Keywords

Comments

a(n) is also the number of permutations of length n in the class of juxtapositions of 231-avoiders with 21-avoiders.

Examples

			There are 23 permutations of length 4 which can be expressed as a juxtaposition of a 321-avoider and a 21-avoider. Only 4321 is not expressable this way.
		

Crossrefs

The other two juxtapositions of Catalan and monotone classes are enumerated by A033321, A165538.

Programs

  • Mathematica
    e = ee /. Solve[ee == 1 + x/(1 - x) ee, ee][[1]];
    c = cc /. Solve[cc == 1 + x cc^2, cc][[1]];
    cb = ccb /. Solve[ccb == 1 + x/(1 - x) ccb^2, ccb][[2]];
    b = bb /. Solve[bb == x^2/(1 - x) + x c bb e, bb][[1]];
    m = mm /.
       Solve[mm ==
          x c mm cb + b e x/(1 - x) (cb - 1) + x^2/(1 - x) (cb - 1),
         mm][[1]];
    f = c + c m cb/(1 - x);
    CoefficientList[Series[f, {x, 0, 25}], x]
    Rest[CoefficientList[Series[(1 - (1 - 4 x)^(1/2) + x (-4 + (1 - 4 x)^(1/2) + ((-1 + 5 x)^(1/2)) / ((-1 + x)^(1/2))))/ (-2 x^2), {x, 0, 33}], x]] (* Vincenzo Librandi, Nov 18 2016 *)

Formula

G.f.: (1 - (1-4*x)^(1/2) + x*(-4 + (1-4*x)^(1/2) + ((-1+5*x)^(1/2)) / ((-1+x)^(1/2)))) / (-2*x^2).
a(n) ~ 5^(n+3/2) / (8*sqrt(Pi)*n^(3/2)). - Vaclav Kotesovec, Nov 17 2016