|
Search: id:A155453
|
|
|
| A155453 |
|
Triangle read by rows: t(n,m)=1 - (k! - n! + (-k + n)! - k!*(n - k)!). |
|
+0 1
|
|
| 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; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
COMMENT
|
Row sums are:
{1, 2, 6, 24, 121, 730, 5111, 40788, 366037, 3651542, 40095063,...}.
|
|
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: A088681 A078584 A080969 this_sequence A032558 A139552 A064943
Adjacent sequences: A155450 A155451 A155452 this_sequence A155454 A155455 A155456
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jan 22 2009
|
|
|
Search completed in 0.002 seconds
|