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

 

Logo


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

Table of n, a(n) for n=1..47.

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 21 05:55 EDT 2020. Contains 337267 sequences. (Running on oeis4.)