I have the following, probably very simple question.

How can I get Mathematica\it{Mathematica} to power expand function cos(y+ilog(x))\cos(y+i \log(x)) in powers of xx? This function obeys a well defined Laurent expansion about x=0x=0 and I would like Mathematica\it{Mathematica} to give 1xeiy/2+xe−iy/2\frac1{x}e^{i y}/2+x e^{-iy}/2 upon evaluation of

Series[Cos[y + I Log[x]], {x, 0, 1}]

However, the result is

Cos[y + I Log[x]]

i.e. the original expression. I can bet that in some circumstances such expansion worked without any effort from my side.

I wonder what is the right way to obtain the expansion of the function cos(y+ilog(x))\cos(y+i \log(x)) in powers of xx.

Any help is appreciated.

=================

=================

1 Answer

1

=================

One way to get the desired output is to use TrigToExp

TrigToExp[Cos[y + I Log[x]]]

(* E^(I y)/(2 x) + 1/2 E^(-I y) x *)

This indeed works, thank you.

– Weather Report

May 8 ’14 at 17:25