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!)
 A137260 Triangular sequence of limited permutations of the form: t(n,m)=-n!+n*(m-1)!. 0
 0, 0, 0, 1, 2, 0, 5, 10, 12, 0, 23, 46, 66, 72, 0, 119, 238, 354, 456, 480, 0, 719, 1438, 2154, 2856, 3480, 3600, 0, 5039, 10078, 15114, 20136, 25080, 29520, 30240, 0, 40319, 80638, 120954, 161256, 201480, 241200, 277200, 282240, 0, 362879, 725758 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,5 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}, {1, 2, 0}, {5, 10, 12, 0}, {23, 46, 66, 72, 0}, {119, 238, 354, 456, 480, 0}, {719, 1438, 2154, 2856, 3480, 3600, 0}, {5039, 10078, 15114, 20136, 25080, 29520, 30240, 0}, {40319, 80638, 120954, 161256, 201480, 241200, 277200, 282240, 0}, {362879, 725758, 1088634, 1451496, 1814280, 2176560, 2535120, 2862720, 2903040, 0} MATHEMATICA t[n_, m_] = -n! + n*(m - 1)!; a = Table[Table[t[n, m], {n, 1, m}], {m, 1, 10}]; Flatten[a] CROSSREFS Sequence in context: A002976 A292590 A080901 * A263101 A219765 A153059 Adjacent sequences:  A137257 A137258 A137259 * A137261 A137262 A137263 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 21 05:55 EDT 2020. Contains 337267 sequences. (Running on oeis4.)