|
|
A036505
|
|
Numerator of (n+1)^n/n!.
|
|
8
|
|
|
1, 2, 9, 32, 625, 324, 117649, 131072, 4782969, 1562500, 25937424601, 35831808, 23298085122481, 110730297608, 4805419921875, 562949953421312, 48661191875666868481, 91507169819844, 104127350297911241532841, 640000000000000000, 865405750887126927009
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Also denominator of Sum_{k=0..n} binomial(n,k)*(k/n)^k*((n-k)/n)^(n-k) [Prodinger]. - N. J. A. Sloane, Jul 31 2013
|
|
LINKS
|
|
|
FORMULA
|
G.f.: -x*e^(-LambertW(-x))/((LambertW(-x)+1)*LambertW(-x)). - Vladimir Kruchinin, Feb 04 2013
|
|
MAPLE
|
|
|
MATHEMATICA
|
|
|
PROG
|
(Magma) [Numerator((n+1)^n/Factorial(n)): n in [0..20]]; // Vincenzo Librandi, Sep 10 2013
(GAP) List([0..20], n -> NumeratorRat((n+1)^n/Factorial(n))); # Muniru A Asiru, Feb 12 2018
(Sage) [numerator((n+1)^n/factorial(n)) for n in (0..20)] # G. C. Greubel, Feb 08 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|