OFFSET
0,1
EXAMPLE
0.58569886194979188645332704695918615397536302...
MATHEMATICA
s = Chop[N[Sum[(-1)^k/(k^3 + 1), {k, 0, Infinity}], 120]]
First[RealDigits[s]]
PROG
(PARI) sumalt(k=0, (-1)^k / (k^3 + 1)) \\ Charles R Greathouse IV, Apr 10 2026
(PARI) sumnumrat((12*k^2 + 6*k + 1)/(64*k^6 + 96*k^5 + 48*k^4 + 24*k^3 + 12*k^2 + 6*k + 2), 0) \\ Charles R Greathouse IV, Apr 10 2026
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, Apr 24 2024
STATUS
approved
