A308941 a(n) = Product_{k=1..n} |Stirling1(n,k)| * k!.

1, 1, 2, 72, 114048, 14515200000, 234709539840000000, 698712561855933972480000000, 523145284340194421434020324704256000000, 128974285815375032145715297526239008267285037056000000, 13271794881195622862513637643190449698396346431150489600000000000000000

Offset

0,3

Links

Table of n, a(n) for n=0..10.

Mathematica

Table[Product[Abs[StirlingS1[n, k]] k!, {k, 1, n}], {n, 0, 10}]

Prog

(PARI) a(n) = prod(k=1, n, abs(stirling(n, k, 1))*k!); \\ Michel Marcus, Jul 02 2019

Crossrefs

Cf. A000178, A006252, A048594, A058807, A308942.

Sequence in context: A362544 A062082 A067689 * A244148 A320443 A079478

Adjacent sequences: A308938 A308939 A308940 * A308942 A308943 A308944

Keyword

nonn

Author

Ilya Gutkovskiy, Jul 01 2019

Status

approved