変数と関数 関数の極限 不定形、三角関数、制限と余弦、倍角、無限級数
微分積分演習〈理工系の数学入門コース/演習 新装版〉 (和達 三樹(著)、十河 清(著)、岩波書店)の第2章(変数と関数)、2-2(関数の極限)、問題4の解答を求めてみる。
1
よって、
2
コード(Wolfram Language, Jupyter)
Sum[Cos[k theta], {k, 0, n}] == Sin[(n + 1) / 2 theta] Cos[n/2 theta] / Sin[theta / 2]
Limit[1 / n Sum[Cos[k / n x], {k, 0, n}], n -> Infinity]
Plot[
Evaluate[Flatten[{
Sin[x] / x,
Table[1 / n Sum[Cos[k / n x], {k, 0, n}], {n, 1, 5}]
}]],
{x, -10, 10},
PlotLegends -> "Expressions"
]