A317274 a(n) = Sum_{k=0..n} binomial(n,k)*Stirling1(n,k).
1, 1, -1, -2, 19, -79, 76, 2640, -36945, 329371, -1861949, -4438774, 355714228, -7292531180, 109844527612, -1277006731104, 8181112825231, 124379387459175, -6806984421310187, 191750786928500050, -4289244423048443149, 80163499107525756105, -1146313133241947091420, 5494990440819210736560
Offset: 0
Keywords
Programs
-
Mathematica
Table[Sum[Binomial[n, k] StirlingS1[n, k], {k, 0, n}], {n, 0, 23}]
-
PARI
a(n) = sum(k=0, n, binomial(n, k)*stirling(n, k, 1)); \\ Michel Marcus, Aug 07 2019
Comments