I am computing the Series expansion (Lauren series) of an integral and I want to sum up the coefficients of the series.
a = 1;
s = Series[
Integrate[2*x*ArcSin[a/x] - 2*a*Sqrt[1 - (a/x)^2], x],
{x, Infinity,29}]
Table[SeriesCoefficient[s, i], {i, 0, 29}]
I am able to generate the Coefficient list but How to sum up them? Could someone help me please? Thanks a lot !