n =

Polinomios de Taylor de 

f(x)=e^x

P_{1}(x)=1+x

P_{2}(x)=1+x+\frac{x^2}{2!}

P_{3}(x)=1+x+\frac{x^2}{2!}+\frac{x^3}{3!}

Eduardo Tellechea Armenta       Universidad de Sonora

n = 1 (slider from 1 to 100, step 1)
lista1 = Sequence(x^(k) / k!, k, 0, n)
f = Sum(lista1)
g(x) = ℯ^(x)
campoDeTexto1 = Textfield(n)
a = 0
A: (a, 0)
b = OrthogonalLine(A, xAxis)
B = Intersect(g, b, (0, 1))
C = Intersect(f, b)
c = Segment(B, C)
d = Segment(C, A)
texto4 = LaTeX(a, true, true)
aq = 0.5
texto1: "P_{" + (LaTeX[n]) + "}(x)=1+x+\frac{x^2}{2!}+\frac{x^3}{3!}+... +\frac{x^" + (LaTeX[n]) + "}{" + (LaTeX[n]) + "!}"