A276926 Number of ordered set partitions of [n] with at most six elements per block.
1, 1, 3, 13, 75, 541, 4683, 47292, 545818, 7086954, 102241902, 1622523210, 28089336198, 526810157874, 10640241569958, 230256584914356, 5314976561846952, 130352566702702344, 3385021286975255928, 92786398312428612792, 2677217312112863784264
Offset: 0
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..424
Programs
-
Maple
a:= proc(n) option remember; `if`(n=0, 1, add( a(n-i)*binomial(n, i), i=1..min(n, 6))) end: seq(a(n), n=0..25);
-
Mathematica
max = 25; CoefficientList[1/(1-Sum[x^i/i!, {i, 1, 6}]) + O[x]^(max+1), x]* Range[0, max]! (* Jean-François Alcover, May 24 2018 *)
Formula
E.g.f.: 1/(1-Sum_{i=1..6} x^i/i!).