A134833 Alternating row sums of triangle A134832.

1, -1, 1, 0, -2, 12, -16, 144, 368, 4768, 39488, 412288, 4577280, 55671808, 731390976, 10335518720, 156303439872, 2518984822784, 43099089166336, 780268880543744, 14902336357040128, 299452809649520640, 6315501510334480384, 139485953831272710144, 3219718099932104622080

Offset

0,5

Links

G. C. Greubel, Table of n, a(n) for n = 0..449

Formula

a(n) = Sum_{k=0..n} A134832(n,k)*(-1)^k for n>=0.

Mathematica

A000757[n_] := (-1)^n + Sum[(-1)^k*n!/((n - k)*k!), {k, 0, n - 1}]; a[n_, n_] = 1; a[n_, 0] := A000757[n]; a[n_, k_] := a[n, k] = n/k*a[n - 1, k - 1]; Table[Sum[a[n, k]*(-1)^k, {k, 0, n}], {n, 0, 10}] (* G. C. Greubel, Nov 10 2016 *)

Crossrefs

Cf. A000142 (factorials as row sums of triangle A134832).

Sequence in context: A327570 A057123 A358783 * A057827 A266802 A082407

Adjacent sequences: A134830 A134831 A134832 * A134834 A134835 A134836

Keyword

sign,easy

Author

Wolfdieter Lang, Jan 21 2008

Status

approved