Hi I'm trying to implement the series in Mathematica, but somehow it is not producing the required results. Could you please help me out?
This is the series, and i'm implementing it like:
For[i = 0, i <= 2, i++,
Print[D[
\!\(\*UnderscriptBox[
OverscriptBox[\(\[Sum]\), \(k + 1\)], \(k = i\)]\)Subscript[a,
k] (D[s[\[Xi]], \[Xi]]/s[\[Xi]])^k],
Print[];]]
I have added the source file as well, zain.nb
Regards
Attachments: