A373021 Decimal expansion of Sum_{k>=0} sin(k*Pi/5)/2^k.
6, 6, 6, 4, 4, 8, 8, 7, 0, 8, 1, 2, 3, 1, 3, 9, 1, 4, 8, 6, 1, 6, 3, 5, 7, 3, 2, 8, 5, 0, 1, 7, 8, 6, 5, 3, 2, 0, 0, 7, 9, 1, 7, 4, 2, 0, 3, 2, 8, 9, 7, 8, 9, 4, 2, 0, 2, 0, 7, 7, 9, 5, 1, 1, 1, 4, 9, 3, 4, 8, 6, 5, 9, 3, 7, 7, 1, 6, 8, 8, 6, 5, 3, 8, 7, 4
Offset: 0
Examples
0.666448870812313914861635732850178653200791742032...
Programs
-
Mathematica
{b, m, h} = {2, 5, 1}; s = Sum[Sin[ h k Pi/m]/b^k, {k, 0, Infinity}] d = N[s, 100] First[RealDigits[d], 100]
Formula
Equals sqrt(10 - 2*sqrt(5)) / (8 - 2*sqrt(5)).
Equals (-1)*Sum_{k>=0} sin(9*k*Pi/5)/2^k.
Peter J. C. Moses (May 22 2024) found the following generalized summation identities for the eight sequences in Comments and many other sequences:
Sum_{k>=0} sin(h*k + Pi/m)/b^(k+r) = b^(1-r)*(b*sin(Pi/m) + sin(h - Pi/m)/(1 + b^2 - 2*b*cos*(Pi/m)).
Sum_{k>=0} cos(h*k + Pi/m)/b^(k+r) = b^(1-r)*(b*cos(Pi/m) + cos(h - Pi/m)/(1 + b^2 - 2*b*cos*(Pi/m)).
Comments