OFFSET
1,2
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..10000
EXAMPLE
constant = 1.7900440156727579847... = positive zero of x^2 - x - sqrt(2).
MATHEMATICA
r = (1/2)*(1 + Sqrt[1 + 4*Sqrt[2]])
RealDigits[N[r, 100], 10][[1]]; (* A298740 *)
PROG
(PARI) (1/2)*(1 + sqrt(1 + 4*sqrt(2))) \\ Altug Alkan, Apr 12 2018
(Magma) SetDefaultRealField(RealField(100)); (1/2)*(1 + Sqrt(1 + 4*Sqrt(2))); // G. C. Greubel, Aug 20 2018
CROSSREFS
KEYWORD
AUTHOR
Clark Kimberling, Feb 13 2018
STATUS
approved