OFFSET
1,1
FORMULA
EXAMPLE
4.988020876600903805335224460790773050832038156091687962387444991919...
MATHEMATICA
RealDigits[E^(2*Sqrt[Log[r]^2 + 2*PolyLog[2, 1-r] - 2*PolyLog[2, 1-r^3]/3]) /. r -> (-1 - 2/(17 + 3*Sqrt[33])^(1/3) + (17 + 3*Sqrt[33])^(1/3))/3, 10, 120][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Vaclav Kotesovec, Oct 09 2024
STATUS
approved