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 A342203 #18 Mar 05 2021 10:54:45
%S A342203 1,4,7,4,4,6,4,2,8,7,3,1,9,3,7,0,1,9,7,8,7,2,3,0,4,1,0,1,1,7,7,6,1,7,
%T A342203 4,1,8,0,3,0,6,4,4,1,0,8,4,1,0,7,8,4,9,8,1,2,7,5,0,2,8,5,7,8,1,9,0,2,
%U A342203 4,7,2,2,5,6,9,9,5,6,0,6,5,6,9,6,6,6,0,4,6,9,7,1,6,0,6,6,1,3,5,0,9,1,5
%N A342203 Decimal expansion of solution to zeta(x) = e.
%e A342203 zeta(1.4744642873...) = e.
%t A342203 RealDigits[x /. FindRoot[Zeta[x] == E, {x, 2}, WorkingPrecision -> 105], 10, 100][[1]] (* _Amiram Eldar_, Mar 05 2021 *)
%o A342203 (PARI) solve(x=1.1, 2, zeta(x)-exp(1)) \\ _Michel Marcus_, Mar 05 2021
%Y A342203 Cf. A001113 (e), A107311.
%K A342203 nonn,cons
%O A342203 1,2
%A A342203 _Koksal Karakus_, Mar 04 2021
%E A342203 More digits from _Alois P. Heinz_, Mar 05 2021