1.
2.
with(plots):f(x):=(1-x)^(-1):
xmin:=-1.2:xmax:=1.2:ymin:=0:ymax:=4:
hanshu:=plot(f(x),x=xmin..xmax):
n:=60:for k from 1 to n do:
taylor(f(x),x=0,k):
taylor_duoxiangshi[k]:=convert(%,polynom):
duoxiangshi[k]:=plot(taylor_duoxiangshi[k],x=xmin..0.99,color=blue):od:
duoxiangshi:=display(seq(duoxiangshi[ceil(k/4)],k=1..n),insequence=true):
display(duoxiangshi,hanshu,scaling=constrained,thickness=3,view=[xmin..xmax,ymin..ymax],tickmarks=[3,5]);
3.
评论