Aproximação da função exponencial

> s1:=series(exp(x),x=0,8);

> p1:=convert(s1,polynom);

> with(plots):
fplot:=plot(exp(x),x=-2..2,color=blue,linestyle=2):
p1plot:=plot(p1,x=-2..2):
display(fplot,p1plot);

> fplot:=plot(exp(x),x=-5..5,color=blue):
p1plot:=plot(p1,x=-5..5):
display(fplot,p1plot);