A124102 a(n) = C(2n,n)*Bell(n).

1, 2, 12, 100, 1050, 13104, 187572, 3009864, 53281800, 1028167140, 21427077100, 478684992240, 11394223609132, 287518731462200, 7658231740945200, 214521099763208400, 6299407928974197330, 193373975594104580880, 6189939300884798312700, 206159811915133359036600

Offset: 0

Author

Zerinvary Lajos, Nov 26 2006

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..445

Crossrefs

Cf. A000110, A056857, A056860.

Programs

Maple

with(combinat): a:=n->binomial(2*n,n)*bell(n): seq(a(n), n=0..20);

Mathematica

Table[Binomial[2n,n]*BellB[n],{n,0,20}] (* Harvey P. Dale, Apr 20 2012 *)

Formula

a(n) = A056857(2n+1,n+1) = A056860(2n+1,n+1). - Alois P. Heinz, May 25 2016