OFFSET
1,2
LINKS
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 (* Vladimir Joseph Stephan Orlovsky, Feb 07 2010 *)
PROG
(PARI) g(n) = for(x=1, n, print1(x^x*(x-1)", "))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 09 2003
EXTENSIONS
More terms from Vladeta Jovovic, Dec 12 2003
STATUS
approved