The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A137259 Triangular sequence of limited permutations of the form: t(n,m)=n!-n*(m-1)!. 0
 0, 0, 0, 3, 3, 0, 20, 20, 16, 0, 115, 115, 110, 90, 0, 714, 714, 708, 684, 576, 0, 5033, 5033, 5026, 4998, 4872, 4200, 0, 40312, 40312, 40304, 40272, 40128, 39360, 34560, 0, 362871, 362871, 362862, 362826, 362664, 361800, 356400, 317520, 0, 3628790 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,4 COMMENTS Inspired by the formula: Sum[k*p[n,k],{k,0,n}]=n! REFERENCES http://www.maa.org/pubs/monthly_mar08_toc.html The Fubini Principle By: Krassimir Penev krassi(AT)att.net LINKS FORMULA t(n,m)=n!-n*(m-1)! EXAMPLE {0}, {0, 0}, {3, 3, 0}, {20, 20, 16, 0}, {115, 115, 110, 90, 0}, {714, 714, 708, 684, 576, 0}, {5033, 5033, 5026, 4998, 4872, 4200, 0}, {40312, 40312, 40304, 40272, 40128, 39360, 34560, 0}, {362871, 362871, 362862, 362826, 362664, 361800, 356400, 317520, 0}, {3628790, 3628790, 3628780, 3628740, 3628560, 3627600, 3621600, 3578400, 3225600, 0} MATHEMATICA t[n_, m_] = n! - n*(m - 1)!; a = Table[Table[t[n, m], {m, n}], {n, 10}]; Flatten[a] CROSSREFS Sequence in context: A039928 A247889 A309012 * A166553 A285863 A111843 Adjacent sequences:  A137256 A137257 A137258 * A137260 A137261 A137262 KEYWORD nonn,uned AUTHOR Roger L. Bagula, Mar 11 2008 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 27 03:21 EDT 2020. Contains 337380 sequences. (Running on oeis4.)