A276977 Duplicate of A106827.

1, 1, 11, 315, 17129, 1510425, 196385475, 35327367075, 8399994587985, 2550903574364145, 963207568455370875, 442613044315692124875, 243195136160954426677305, 157442856285298191126143625, 118607799383105394973766029875, 102867257381973743111023517821875

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..200

Formula

a(n) = (-1)^n * Sum_{k=0..n} Stirling1(n+k, k) * !(n-k) * C(2*n, n+k), where !n = A000166(n) is the subfactorial, C(n,k) are binomial coefficients.

Mathematica

Table[(-1)^n Sum[StirlingS1[n+k, k] Subfactorial[n-k] Binomial[2n, n+k], {k, 0, n}], {n, 0, 20}]

Crossrefs

Cf. A055505, A055535, A000166.

Sequence in context: A266830 A266029 A106827 * A176285 A266484 A219979

Adjacent sequences: A276974 A276975 A276976 * A276978 A276979 A276980

Keyword

dead

Author

Vladimir Reshetnikov, Sep 23 2016

Status

approved