OFFSET
1,2
EXAMPLE
1.58454170990556500250912545055...
MATHEMATICA
k = 43; r = 44; While[k > 0, r = (k + r)^(1/(k + 1)); k-- ]; RealDigits[r, 10, 111][[1]] (* Robert G. Wilson v, Nov 04 2004 *)
PROG
(PARI) t=0; forstep(n=100, 1, -1, t=(t+n)^(1/(n+1))); print(t)
CROSSREFS
KEYWORD
AUTHOR
Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 03 2004
STATUS
approved