A372838 Decimal expansion of Sum_{k>=1} (1 - cos(Pi/k^2)).

2, 3, 9, 0, 0, 2, 5, 0, 7, 8, 1, 6, 2, 3, 3, 4, 4, 3, 6, 1, 8, 6, 0, 1, 7, 2, 6, 5, 7, 8, 4, 5, 0, 2, 4, 8, 3, 5, 0, 0, 4, 0, 2, 2, 1, 2, 6, 0, 4, 3, 6, 1, 4, 3, 6, 3, 5, 6, 5, 6, 5, 6, 0, 4, 0, 5, 6, 8, 9, 9, 4, 8, 0, 5, 3, 6, 0, 0, 8, 9, 0, 1, 1, 3, 8, 6

Offset

1,1

Links

Table of n, a(n) for n=1..86.

Example

2.39002507816233443618601726578450248350040221260...

Mathematica

s = Sum[(1 - Cos[Pi/k^2]), {k, 1, Infinity}]
d = N[s, 100]
First[RealDigits[d]]

Crossrefs

Cf. A372837.

Sequence in context: A075849 A005604 A114020 * A011163 A155983 A201407

Adjacent sequences: A372835 A372836 A372837 * A372839 A372840 A372841

Keyword

nonn,cons

Author

Clark Kimberling, Jun 07 2024

Status

approved