A155453 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A155453

Triangle read by rows: t(n,m)=1 - (k! - n! + (-k + n)! - k!*(n - k)!).

1, 1, 1, 2, 2, 2, 6, 6, 6, 6, 24, 24, 25, 24, 24, 120, 120, 125, 125, 120, 120, 720, 720, 743, 745, 743, 720, 720, 5040, 5040, 5159, 5155, 5155, 5159, 5040, 5040, 40320, 40320, 41039, 40915, 40849, 40915, 41039, 40320, 40320, 362880, 362880, 367919, 366475

(list; table; graph; refs; listen; history; text; internal format)

OFFSET

0,4

COMMENTS

Row sums are:

{1, 2, 6, 24, 121, 730, 5111, 40788, 366037, 3651542, 40095063,...}.

LINKS

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

FORMULA

t(n,m)=t(n,m)=1 - (k! - n! + (-k + n)! - k!*(n - k)!)..

EXAMPLE

{1},

{1, 1},

{2, 2, 2},

{6, 6, 6, 6},

{24, 24, 25, 24, 24},

{120, 120, 125, 125, 120, 120},

{720, 720, 743, 745, 743, 720, 720},

{5040, 5040, 5159, 5155, 5155, 5159, 5040, 5040},

{40320, 40320, 41039, 40915, 40849, 40915, 41039, 40320, 40320},

{362880, 362880, 367919, 366475, 365617, 365617, 366475, 367919, 362880, 362880},

{3628800, 3628800, 3669119, 3653995, 3645337, 3642961, 3645337, 3653995, 3669119, 3628800, 3628800}

MATHEMATICA

Table[Table[1 - (k! - n! + (-k + n)! - k!*(n - k)!), {k, 0, n}], {n, 0, 10}];

Flatten[%]

CROSSREFS

Sequence in context: A339385 A080969 A214078 * A032558 A211512 A139552

Adjacent sequences: A155450 A155451 A155452 * A155454 A155455 A155456

KEYWORD

nonn,uned,tabl

AUTHOR

Roger L. Bagula, Jan 22 2009

STATUS

approved