|
| |
|
|
A012960
|
|
Expansion of e.g.f. exp(arctan(x)+log(x+1)).
|
|
0
|
|
|
|
1, 2, 3, 2, -11, -30, 175, 1010, -6135, -60670, 374875, 5719650, -35199875, -779710750, 4687746375, 145208599250, -836951243375, -35435177514750, 191995883837875, 10975003189933250, -54688433347786875
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Table of n, a(n) for n=0..20.
|
|
|
FORMULA
|
a(n) = (n*A002019(n)-A002019(n+1))/(n-1) for n > 1. [Mark van Hoeij, Jul 02 2010]
|
|
|
EXAMPLE
|
1+2*x+3/2!*x^2+2/3!*x^3-11/4!*x^4-30/5!*x^5...
|
|
|
MATHEMATICA
|
With[{nn=20}, CoefficientList[Series[Exp[ArcTan[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jul 25 2013 *)
|
|
|
PROG
|
(PARI) my(x='x+O('x^30)); Vec(serlaplace(exp(atan(x)+log(x+1)))) \\ Michel Marcus, May 10 2020
|
|
|
CROSSREFS
|
Cf. A002019.
Sequence in context: A220947 A224417 A225787 * A013117 A120864 A173463
Adjacent sequences: A012957 A012958 A012959 * A012961 A012962 A012963
|
|
|
KEYWORD
|
sign
|
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
|
EXTENSIONS
|
Definition clarified by Harvey P. Dale, Jul 25 2013
|
|
|
STATUS
|
approved
|
| |
|
|
