OFFSET
1,2
COMMENTS
Appears to always be an integer.
FORMULA
a(n) = Euler(n, n)/(n-1) where Euler(n, x) is Eulerian polynomial of degree n (cf. A008292). - Vladeta Jovovic, Sep 26 2003
a(n) = (n-1)^n/n*polylog(-n, 1/n) = 1/(n-1)*Sum(n^i*Sum((-1)^j*binomial(n+1, j)*(i-j+1)^n, j = 0 .. i), i = 0 .. n), n>1. - Vladeta Jovovic, Sep 26 2003
Prime p divides a(p-1) for p>2. - Alexander Adamchuk, Sep 19 2006
a(n) = A122020[n] / (n*(n-1)) for n>1. a(n) = A122778[n] / (n-1) for n>1. a(n) = ((n-1)^n)/n * A121376[n]/A121985[n] for n>1. - Alexander Adamchuk, Sep 19 2006
a(n) ~ exp(-1) * n! * n^(n-1) / log(n)^(n+1). - Vaclav Kotesovec, Jun 06 2022
MATHEMATICA
Table[Sum[(n-1)^n*k^n/n^(k+1), {k, 1, Infinity}], {n, 1, 20}] (* Vaclav Kotesovec, Oct 16 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Sep 24 2003
STATUS
approved