|
| |
|
|
A112541
|
|
Sum for k=0 to n of (n-k)!*(n^k).
|
|
0
| |
|
|
1, 2, 8, 48, 400, 4390, 60624, 1013404, 19881728, 447085170, 11319529600, 318298578664, 9834869311488, 331059072378814, 12055438037135360, 472096504892128500, 19781301201305534464, 882991510898240350666
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| This sequence appears in the calculation of the expectation of the number of runs of an n-faced die, stopping when a face appears for the second time.
|
|
|
MATHEMATICA
| f[n_] := Sum[(n - k)!n^k, {k, 0, n}]; Array[f, 17] (* Robert G. Wilson v *)
|
|
|
CROSSREFS
| Sequence in context: A009812 A063075 A177386 * A052667 A006925 A005867
Adjacent sequences: A112538 A112539 A112540 * A112542 A112543 A112544
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger Cuculiere (rcuculiere(AT)free.fr), Dec 17 2005
|
|
|
EXTENSIONS
| Corrected and extended by Robert G. Wilson v (rgwv(at)rgwv.com), Dec 22 2005
|
| |
|
|
