login
A333350
Decimal expansion of Integral_{s >= 0} (i^s + (-i)^s)/(2*Pi)^s.
0
6, 2, 8, 8, 5, 0, 7, 4, 9, 6, 3, 5, 3, 2, 1, 6, 0, 2, 1, 2, 6, 9, 6, 2, 4, 6, 1, 9, 1, 3, 6, 1, 5, 4, 2, 1, 4, 4, 8, 1, 5, 9, 0, 6, 8, 6, 1, 9, 9, 0, 6, 1, 2, 7, 2, 6, 2, 2, 1, 0, 0, 7, 1, 5, 4, 6, 3, 0, 6, 9, 3, 2, 4, 0, 3, 5, 5, 1
OFFSET
0,1
EXAMPLE
Equals 0.6288507496353216...
MATHEMATICA
c := NIntegrate[Re[((-I)^s + I^s)/(2 Pi)^s], {s, 0, Infinity},
WorkingPrecision -> 110, AccuracyGoal -> 100 ]; RealDigits[Re[c]][[1]]
CROSSREFS
Sequence in context: A376079 A085589 A259931 * A332092 A021163 A114866
KEYWORD
nonn,cons
AUTHOR
Peter Luschny, Apr 23 2020
STATUS
approved