|
| |
| |
|
|
|
0, 4, 54, 768, 12500, 233280, 4941258, 117440512, 3099363912, 90000000000, 2853116706110, 98077104930816, 3634501279107036, 144456088732254208, 6130514465332031250, 276701161105643274240, 13235844190181388226832
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..17.
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, Dec 12 2003
|
|
|
MATHEMATICA
|
f[n_]:=(n^(n+1)-n^n); lst={}; Do[AppendTo[lst, f[n]], {n, 5!}]; lst [From Vladimir Joseph Stephan Orlovsky, Feb 07 2010]
|
|
|
PROG
|
(PARI) g(n) = for(x=1, n, print1(x^x*(x-1)", "))
|
|
|
CROSSREFS
|
Sequence in context: A073863 A199022 A221395 * A055774 A071248 A221611
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, Dec 12 2003
|
|
|
STATUS
|
approved
|
| |
|
|