editing
approved
editing
approved
Decimal expansion of a nested radical: sqrtSqrt(1 + CubeRoot(2 + 4thRoot(3 + 5thRoot(4 + ...
proposed
editing
editing
proposed
(PARI) t=0:; forstep(n=100, 1, -1, t=(t+n)^(1/(n+1))):; print(t)
proposed
editing
editing
proposed
Decimal expansion of a nested radical: Sqrtsqrt(1 + CubeRoot(2 + 4thRoot(3 + 5thRoot(4 + ...
k = 43; r = 44; While[k > 0, r = (k + r)^(1/(k + 1)); k-- ]; RealDigits[r, 10, 111][[1]] (from * _Robert G. Wilson v _, Nov 04 2004 *)
approved
editing
Decimal expansion of a nested radical: Sqrt(1 + CubeRoot(2 + 4thRoot(3 + 5thRoot(4 + ...
1, 5, 8, 4, 5, 4, 1, 7, 0, 9, 9, 0, 5, 5, 6, 5, 0, 0, 2, 5, 0, 9, 1, 2, 5, 4, 5, 0, 5, 5, 2, 6, 2, 9, 1, 7, 2, 9, 4, 8, 9, 4, 7, 5, 0, 7, 8, 0, 5, 9, 2, 3, 2, 9, 1, 5, 0, 2, 0, 2, 4, 9, 3, 6, 5, 8, 9, 6, 3, 0, 0, 6, 1, 9, 8, 9, 2, 6, 0, 8, 4, 0, 2, 6, 4, 8, 9, 1, 2, 2, 8, 5, 0, 7, 7, 2, 3, 8, 4, 9, 9, 7, 9, 6
1,2
1.58454170990556500250912545055...
k = 43; r = 44; While[k > 0, r = (k + r)^(1/(k + 1)); k-- ]; RealDigits[r, 10, 111][[1]] (from Robert G. Wilson v Nov 04 2004)
(PARI) t=0:forstep(n=100, 1, -1, t=(t+n)^(1/(n+1))):print(t)
cons,easy,nonn
Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 03 2004
approved