|
Search: id:A009362
|
|
|
| A009362 |
|
Expansion of ln(1+sinh(x)/exp(x)). |
|
+0
3
|
|
| 0, 1, -3, 12, -66, 480, -4368, 47712, -608016, 8855040, -145083648, 2641216512, -52891055616, 1155444326400, -27344999497728, 696933753434112, -19031293222127616, 554336947975618560, -17155693983744196608
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
FORMULA
|
a(n) = -Sum_{k>0} (-2*k)^n/3^k/k = -(-2)^n*polylog(-n+1, 1/3), n>0. - Vladeta Jovovic (vladeta(AT)Eunet.yu), Sep 30 2003
a(n) = -(-1)^n*Sum_{k=0..n-1} 3^k*Sum_{j=0..k} (-1)^j*(k-j)^n*C(n,j) for n>0. a(n) = -(-1)^n*Sum_{k=0..n-1} 3^k*A008292(n-1,k) for n>0, where A008292 are the Eulerian numbers. - Paul D. Hanna (pauldhanna(AT)juno.com), Mar 29 2006
|
|
MATHEMATICA
|
Log[ 1+Sinh[ x ]/Exp[ x ] ]
|
|
PROGRAM
|
(PARI) a(n)=-(-1)^n*sum(k=0, n-1, 3^k*sum(j=0, k, (-1)^j*(k-j)^(n-1)*binomial(n, j))) - Paul D. Hanna (pauldhanna(AT)juno.com), Mar 29 2006
|
|
CROSSREFS
|
Cf. A008292 (Eulerian numbers).
Sequence in context: A080599 A120575 A123227 this_sequence A107713 A107103 A107887
Adjacent sequences: A009359 A009360 A009361 this_sequence A009363 A009364 A009365
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
R. H. Hardin (rhh(AT)cadence.com)
|
|
EXTENSIONS
|
Extended with signs Mar 15 1997 by Olivier Gerard.
|
|
|
Search completed in 0.002 seconds
|
