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