OFFSET
0,3
COMMENTS
The blocks are ordered with increasing least elements.
a(0) = 1 by convention.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..445
Wikipedia, Partition of a set
FORMULA
a(n) = A080510(2n,n).
a(n) = A327884(2n,n).
a(n) = ceiling(C(2n,n)*(A000110(n)-1/2)). - Ludovic Schwob, Jan 15 2022
EXAMPLE
a(1) = 1: 1|2.
a(2) = 9: 12|34, 12|3|4, 13|24, 13|2|4, 14|23, 1|23|4, 14|2|3, 1|24|3, 1|2|34.
MAPLE
b:= proc(n, k) option remember; `if`(n=0, 1, add(
b(n-i, k)*binomial(n-1, i-1), i=1..min(n, k)))
end:
a:= n-> `if`(n=0, 1, b(2*n, n)-b(2*n, n-1)):
seq(a(n), n=0..20);
MATHEMATICA
b[n_, k_] := b[n, k] = If[n == 0, 1, Sum[b[n - i, k]*Binomial[n - 1, i - 1], {i, 1, Min[n, k]}]];
a[n_] := If[n == 0, 1, b[2*n, n] - b[2*n, n - 1]];
Table[a[n], {n, 0, 20}] (* Jean-François Alcover, May 20 2018, translated from Maple *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Sep 22 2016
STATUS
approved