In[]:=
NSum[(-1),{n,2,3}]
n
(-1)
1/n
n
Out[]=
-0.028036
In[]:=
NSum[(-1),{n,2,17}]
n
(-1)
1/n
n
Out[]=
0.099055
In[]:=
CMRB=N[Sum[(-1),{n,2,Infinity}]]
n
(-1)
1/n
n
Out[]=
0.18786
In[]:=
LogPlotCMRB,(-1),{n,2,x}],{x,1,30},PlotRange->Sum[(-1),{n,2,27}],.192,PlotLegends->Placed["Expressions",Below]
N-SumDerivative[m][DirichletEta][m],{m,2,x}+Limit[D[DirichletEta[m],m],m->1]
m
(-1)
m!
,
Sum[n
(-1)
1/n
n
n
(-1)
1/n
n
Out[]=
""