f:=x->ln(x);p1:=convert(taylor(f(x),x=1,2),polynom);plot({f(x),p1},x=-1..4,y=-1.5..1.5,thickness=2);p3:=convert(taylor(f(x),x=1,4),polynom);plot({f(x),p3},x=-1..4,y=-1.5..1.5,thickness=2);p5:=convert(taylor(f(x),x=1,6),polynom);plot({f(x),p5},x=-1..4,y=-1.5..1.5,thickness=2);