A176063 Triangle read by rows: T(n,k) = (-1)^k * binomial(n,k) * pochhammer(-n,k) + (-1)^(n-k) * binomial(n,n-k) * pochhammer(-n,n-k) - n!.

1, 1, 1, 1, 6, 1, 1, 21, 21, 1, 1, 88, 120, 88, 1, 1, 505, 680, 680, 505, 1, 1, 3636, 5130, 4080, 5130, 3636, 1, 1, 30289, 48762, 31710, 31710, 48762, 30289, 1, 1, 282304, 525728, 354816, 194880, 354816, 525728, 282304, 1, 1, 2903121, 6171552, 4759776, 1923264, 1923264, 4759776, 6171552, 2903121, 1

Offset

0,5

Links

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

Example

Triangle begins:
  {1},
  {1, 1},
  {1, 6, 1},
  {1, 21, 21, 1},
  {1, 88, 120, 88, 1},
  {1, 505, 680, 680, 505, 1},
  {1, 3636, 5130, 4080, 5130, 3636, 1},
  ...

Mathematica

L[n_, m_] = (-1)^m* Binomial[n, m] Pochhammer[ -n, m] - (-1)^n Pochhammer[ -n, n] + (-1)^(n - m)* Binomial[n, - m + n] Pochhammer[ -n, -m + n];
Table[Table[L[n, m], {m, 0, n}], {n, 0, 10}];
Flatten[%]

Crossrefs

Cf. A021010.

Sequence in context: A157638 A347975 A142596 * A350060 A155467 A152936

Adjacent sequences: A176060 A176061 A176062 * A176064 A176065 A176066

Keyword

nonn,tabl,less

Author

Roger L. Bagula, Apr 07 2010

Extensions

Edited by Sean A. Irvine, Mar 18 2026

Status

approved