Revision History for A296336
(Underlined text is an addition;
strikethrough text is a deletion.)
Showing entries 1-10
| older changes
|
|
|
|
#18 by Bruno Berselli at Wed Mar 27 10:03:50 EDT 2019
|
|
|
|
#17 by Paolo P. Lava at Wed Mar 27 05:22:17 EDT 2019
|
| MAPLE
|
a:=series(log(1 + x*cos(x))*exp(x), x=0, 25): seq(n!*coeff(a, x, n), n=0..24); # Paolo P. Lava, Mar 27 2019
|
| STATUS
|
approved
editing
|
|
|
|
#16 by N. J. A. Sloane at Thu Dec 28 21:25:46 EST 2017
|
|
|
|
#15 by Altug Alkan at Thu Dec 28 06:18:04 EST 2017
|
|
|
|
#14 by Altug Alkan at Thu Dec 28 06:17:57 EST 2017
|
| PROG
|
(PARI) x='x+O('x^99); concat([0], Vec(serlaplace(exp(x)*log(1+x*cos(x))))) \\ Altug Alkan, Dec 28 2017
|
| STATUS
|
proposed
editing
|
|
|
|
#13 by Ilya Gutkovskiy at Wed Dec 27 08:32:10 EST 2017
|
|
|
|
#12 by Ilya Gutkovskiy at Wed Dec 27 06:11:17 EST 2017
|
|
|
|
#11 by Ilya Gutkovskiy at Wed Dec 27 06:01:18 EST 2017
|
| NAME
|
allocated for Ilya Gutkovskiy
Expansion of e.g.f. log(1 + x*cos(x))*exp(x).
|
| DATA
|
0, 1, 1, -1, 0, -16, -5, 13, -1512, 12336, -98177, 444773, 1249160, -75244508, 1296229779, -15956614403, 130892534160, 59122803744, -31478991643617, 837166840532589, -14900078660739984, 181343532181629332, -480411914937891389, -54306065912649098539, 2080183542455901881320
|
| OFFSET
|
0,6
|
| EXAMPLE
|
log(1 + x*cos(x))*exp(x) = x/1! + x^2/2! - x^3/3! - 16*x^5/5! - 5*x^6/6! + ...
|
| MATHEMATICA
|
nmax = 24; CoefficientList[Series[Log[1 + x Cos[x]] Exp[x], {x, 0, nmax}], x] Range[0, nmax]!
|
| CROSSREFS
|
Cf. A003728, A009334, A009371, A296436, A296438.
|
| KEYWORD
|
allocated
sign
|
| AUTHOR
|
Ilya Gutkovskiy, Dec 27 2017
|
| STATUS
|
approved
editing
|
|
|
|
#10 by Ilya Gutkovskiy at Wed Dec 27 06:01:18 EST 2017
|
| NAME
|
allocated for Ilya Gutkovskiy
|
| KEYWORD
|
recycled
allocated
|
|
|
|
#9 by Bruno Berselli at Wed Dec 27 03:10:03 EST 2017
|
|
|
|
|