|
Search: id:A013520
|
|
|
| A013520 |
|
A problem in derangements. |
|
+0 1
|
|
| 0, 2, 9, 100, 1237, 18896, 337663, 6941194, 161357425, 4186540456, 119942830785, 3761004532550, 128121728853479, 4711881688294652, 186065500280409423, 7852240169544076190, 352684377274345906213, 16798134072300013751064
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
REFERENCES
|
Frank Schmidt and Rodica Simion, Card shuffling and a transformation on S_n, Aequationes Math. 44 (1992), no. 1, 11-34.
|
|
FORMULA
|
The reference gives a generating function.
|
|
MAPLE
|
a := n->simplify((n-1)!*sum(n^k/k!, k=0..n-1)-2*(n-1)^(n-1)): b := simplify(x^2+sum(a(n)*x^n/n!, n=3..70)): f := simplify(exp(b)): fser := simplify(series(f, x=0, 27)): s := seq(simplify(n!*coeff(fser, x^n)), n=1..25);
|
|
CROSSREFS
|
Sequence in context: A013132 A013057 A027686 this_sequence A041239 A098610 A125815
Adjacent sequences: A013517 A013518 A013519 this_sequence A013521 A013522 A013523
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com).
|
|
EXTENSIONS
|
More terms and Maple code from Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 09 2004
|
|
|
Search completed in 0.002 seconds
|