OFFSET
1,1
EXAMPLE
2.39002507816233443618601726578450248350040221260...
MATHEMATICA
s = Sum[(1 - Cos[Pi/k^2]), {k, 1, Infinity}]
d = N[s, 100]
First[RealDigits[d]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, Jun 07 2024
STATUS
approved