OFFSET
1,2
EXAMPLE
1.343713373744601701271528753975058247637602609...
MATHEMATICA
First[RealDigits[Sqrt[(3 - #)/(8 - 4*#)], 10, 100]] & [Root[#^3 - #^2 - # - 1 &, 1]] (* or *)
First[RealDigits[PolyhedronData["SnubCube", "Circumradius"], 10, 100]]
CROSSREFS
KEYWORD
AUTHOR
Paolo Xausa, Nov 03 2024
STATUS
approved