OFFSET
1,1
COMMENTS
For x >= 0, sqrt(x + sqrt(x + sqrt(x + sqrt(x + ...)))) = (sqrt(4*x+1) + 1)/2. This is an integer for each x such that 2*x is a term in A000217.
EXAMPLE
3.541381265149109844499842122601033531042485047393205593209576523243166362659...
MAPLE
evalf((sqrt(37)+1)/2, 120); # Muniru A Asiru, Oct 07 2018
MATHEMATICA
RealDigits[ Fold[ Sqrt[#1 + #2] &, 0, Table[9, {135}]], 10, 111][[1]] (* or *)
RealDigits[(Sqrt[37] + 1)/2, 10, 111][[1]]
PROG
(PARI) (sqrt(37)+1)/2 \\ Altug Alkan, Oct 03 2018
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Robert G. Wilson v, Oct 03 2018
STATUS
approved