This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A359809 #15 Jan 28 2023 14:00:13
%S A359809 1,9,1,5,0,0,8,0,4,8,1,5,4,5,3,7,4,8,1,3,5,3,0,0,3,0,6,1,0,0,4,8,1,5,
%T A359809 6,5,0,5,7,3,3,6,2,5,6,8,7,8,5,9,2,8,9,8,6,1,1,3,7,4,7,3,4,6,6,4,1,3,
%U A359809 5,6,2,3,7,6,2,6,3,1,7,3,0,9,7,7,9,3,7,6,6,1,1,3,6,8
%N A359809 Decimal expansion of the positive solution to tanh(x) = x/2.
%C A359809 Also, point where e^-(x/2 - 1)^2 + e^-(x/2 + 1)^2 has its maximum.
%e A359809 1.91500804815453748135300306100481565...
%t A359809 RealDigits[x /. FindRoot[Tanh[x] == x/2, {x, 2}, WorkingPrecision -> 110], 10, 105][[1]] (* _Amiram Eldar_, Jan 13 2023 *)
%o A359809 (PARI) localprec(199); digits(solve(x=1,2,tanh(x)-x/2)\.1^150)
%Y A359809 Cf. A309211.
%K A359809 nonn,cons
%O A359809 1,2
%A A359809 _M. F. Hasler_, Jan 13 2023