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 A332322 #13 Feb 13 2020 11:54:29
%S A332322 2,7,5,9,0,0,2,7,0,9,9,6,2,2,7,1,8,5,6,5,8,2,5,4,0,9,2,3,0,6,7,5,4,1,
%T A332322 6,8,9,8,3,4,3,7,7,2,6,9,6,4,9,9,0,8,3,7,4,3,9,1,3,6,4,8,3,6,5,4,7,4,
%U A332322 2,9,8,5,9,7,3,4,9,2,3,5,0,6,3,2,5,1
%N A332322 Decimal expansion of the real zero (negated) of the 7th Maclaurin polynomial of e^x.
%e A332322 Real zero = -2.75900270996227185658254092306754168983437...
%t A332322 z = 150; p[n_, x_] := Normal[Series[E^x, {x, 0, n}]];
%t A332322 t = x /. NSolve[p[7, x] == 0, x, z][[1]]
%t A332322 RealDigits[t][[1]]
%t A332322 Plot[Evaluate[p[7, x]], {x, -4, 1}]
%Y A332322 Cf. A117605.
%K A332322 nonn,cons,easy
%O A332322 1,1
%A A332322 _Clark Kimberling_, Feb 11 2020