A058808 Product{k=1 to n}[S(n,k)], where S(n,k) is a Stirling number of the second kind. (S(n,k) = number of ways of partitioning a set of n elements into k nonempty subsets.)

1, 1, 3, 42, 3750, 2720250, 19512927000, 1631977354072800, 1833446251541145780000, 31323109023670061678062500000, 9087660958278168844264470405352500000

Offset

1,3

Links

Vaclav Kotesovec, Table of n, a(n) for n = 1..40

Formula

log(a(n)) ~ n^2 * (log(n) + gamma - 3/2) / 2, where gamma is the Euler-Mascheroni constant A001620. - Vaclav Kotesovec, Feb 27 2021

Example

a(4) = S(4,1)*S(4,2)*S(4,3)*S(4,4) = 1*7*6*1 = 42.

Maple

a:=n->mul(stirling2(n, k), k=1..n): seq(a(n), n=1..12); # Zerinvary Lajos, Jun 28 2007

Mathematica

Table[Product[StirlingS2[n, k], {k, 1, n}], {n, 1, 12}] (* Vaclav Kotesovec, Feb 26 2021 *)

Prog

(PARI) a(n) = prod(k=1, n, stirling(n, k, 2)); \\ Michel Marcus, Dec 12 2015

Crossrefs

Cf. A058807, A294373.

Sequence in context: A145984 A213956 A157552 * A155210 A157572 A332973

Adjacent sequences: A058805 A058806 A058807 * A058809 A058810 A058811

Keyword

easy,nonn

Author

Leroy Quet, Jan 02 2001

Status

approved