# Convergence of $\sum _{k=1}^\infty \sin \left(\sqrt{k}\right)/k$

This was asked at an oral examination.

Does the series $\displaystyle \sum _{k\geq1}\frac{\sin\left(\sqrt{k}\right)}{k}$ converge ?

After playing with Mathematica, it's very likely it converges, but slowly (sort of oscillating).

To actually prove convergence, summation by part is useless since $\displaystyle \sum _{k\geq1}\sin\left(\sqrt{k}\right)$ diverges.

Any suggestion is appreciated.

• It does converge by the integral test. – Alex Schiff Jun 9 '14 at 19:46
• @AlexSchiff, the terms are not nonnegative nonincreasing. – Christopher A. Wong Jun 9 '14 at 19:59
• Whoopsie daisy, not enough coffee this morning. :-P – Alex Schiff Jun 9 '14 at 20:06

## 2 Answers

The convergence of $\int_1^\infty\frac{\sin\sqrt t}tdt$ can be deduced by a substitution $s=\sqrt t$ and the convergence of $\int_1^\infty\frac{\sin s}sds$. Define $$a_k:=\int_k^{k+1}\frac{\sin\sqrt t}{t}\mathrm dt-\frac{\sin\sqrt k}k$$ and $g(x):=\frac{\sin(\sqrt x)}x$. Since $$g'(x)=\frac{\cos(\sqrt x)}{x^{3/2}}-\frac{\sin(\sqrt x)}{x^2}$$ and by the mean value theorem, $a_k=g'(x_k)$ for some $x_k\in [k,k+1)$, we obtain $$|a_k|\leqslant \frac 2{k^{3/2}},$$ hence $\sum_{k\geqslant 1}|a_k|$ is convergent.

• There's one thing I don't get: how did you apply the mean value theorem ? – Gabriel Romon Jun 9 '14 at 20:13
• Explain why $a_k = g'(x_k)$ by MVT? $a_k$ is not equal to $g(k+1) - g(k)$. – Christopher A. Wong Jun 9 '14 at 20:13
• @ChristopherA.Wong The integral $\int_k^{k+1}\frac{\sin\sqrt t}{t}\mathrm dt$ is $g(y_k)$ for some $y_k\in [k,k+1]$, then $|g(y_k)-g(k)|\leqslant \sup_{t\in [k,k+1]}|g'(t)|$. – Davide Giraudo Jun 9 '14 at 20:17

$\sum_{k=1}^{n}\dfrac{\sin(\sqrt{k})}{k}$ plotted against $C-\dfrac{2\cos(\sqrt{k-\sqrt{\pi}})}{\sqrt{k+\sqrt{\pi}}}$, where $C$ is calculated in Mathematica numerically with fact that $\sum_{k=1}^{\infty}\dfrac{\sin(\sqrt{k})}{k}=\sum_{k=1}^{\infty}\dfrac{e^{i\sqrt{k}}}{k}$: c = Quiet[N[Im[Sum[E^(I Sqrt[k])/k, {k, 1, Infinity}]]]];
Show[Plot[Sum[Sin[Sqrt[k]]/k, {k, 1, n}], {n, 0, 100},
GridLines -> {{}, {c}}, GridLinesStyle -> Darker[Green],
PlotStyle -> {Darker[Green], Thick}],
Plot[c - 2 Cos[Sqrt[k - Sqrt[Pi]]]/Sqrt[k + Sqrt[Pi]], {k, 0, 100},
PlotStyle -> {Darker[Blue], Thin}, PlotRange -> All]]


and for larger $k$: Quiet[N[Im[Sum[E^(I Sqrt[k])/k, {k, 1, Infinity}]]]]


then gives $C\approx1.7156717726570607\dots$.

• Thanks for portraying the series. Does WolframAlpha/Mathematica suggests a closed form for the limit ? (Can you copy-paste it with at least 5 digits precision ?) – Gabriel Romon Jun 10 '14 at 13:49
• @ G.T.R. - Please see update. – martin Jun 11 '14 at 6:10
• Interesting. WolframAlpha finds multiple possible closed Forms for $C$ m.wolframalpha.com/input/?i=1.7156717726570607&x=8&y=0 – Gabriel Romon Jun 11 '14 at 8:01
• Hmmm ... just typed in completely random number (1.254635278541656) & also came up with possible closed forms ;) – martin Jun 11 '14 at 8:57
• Can you get 20 digits precision ? There will be less possible closed Forms then. – Gabriel Romon Jun 11 '14 at 9:25