|
| |
|
|
A013029
|
|
E.g.f. (in x^2) is arctan(sinh(x)+sin(x))
|
|
0
| |
|
|
2, -16, 770, -92496, 20740610, -7474383376, 3950577954050, -2879011223666256, 2766724614020441090, -3389992164431254725136, 5158145935254382213801730, -9542165281823577542150984016
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
MATHEMATICA
| Partition[CoefficientList[Series[ArcTan[Sinh[x] + Sin[x]], {x, 0, 23}], x]*Range[0, 23]!, 2][[All, 2]]
|
|
|
PROG
| (PARI) x='x+O('x^33) /* That many terms */
v=Vec(serlaplace(atan(sin(x)+sinh(x)))); /* every second term is zero */
vector(#v\2, n, v[2*n-1]) /* show terms */
/* Joerg Arndt, Mar 16 2011 */
|
|
|
CROSSREFS
| Sequence in context: A005118 A108400 A186002 * A012915 A012920 A013088
Adjacent sequences: A013026 A013027 A013028 * A013030 A013031 A013032
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Patrick Demichel (dml(AT)hpfrcu03.france.hp.com)
|
| |
|
|
