|
| |
| |
|
|
|
0, 4, 54, 768, 12500, 233280, 4941258, 117440512, 3099363912, 90000000000, 2853116706110, 98077104930816, 3634501279107036, 144456088732254208, 6130514465332031250, 276701161105643274240, 13235844190181388226832
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Milan Janjic, Enumerative Formulas for Some Functions on Finite Sets
|
|
|
FORMULA
| E.g.f.: -(1+3*LambertW(-x)+LambertW(-x)^2)/(1+LambertW(-x))^3. - Vladeta Jovovic (vladeta(AT)eunet.rs), Dec 12 2003
|
|
|
MATHEMATICA
| f[n_]:=(n^(n+1)-n^n); lst={}; Do[AppendTo[lst, f[n]], {n, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Feb 07 2010]
|
|
|
PROG
| (PARI) g(n) = for(x=1, n, print1(x^x*(x-1)", "))
|
|
|
CROSSREFS
| Sequence in context: A001545 A073863 A199022 * A055774 A071248 A127833
Adjacent sequences: A089202 A089203 A089204 * A089206 A089207 A089208
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Dec 09 2003
|
|
|
EXTENSIONS
| More terms from Vladeta Jovovic (vladeta(AT)eunet.rs), Dec 12 2003
|
| |
|
|
