f[x_]=  (x^3)-7 x +2

Plot[f[x],{x,-5,5}]

f'[2]

g[x_]= f[2]+f'[2](x-2)

Plot[{f[x],g[x]},{x,-5,5}]

Plot[{f[x],g[x]},{x,1,3}]

Plot[Abs[x],{x,-3,3}]

Plot[{f[x],f''[x],f'[x]},{x,-5,5}]

h[x_]=f[2]+f'[2](x-2)+(1/2)f''[2](((x-2))^2)

Plot[{f[x],g[x],h[x]},{x,-5,5}]

Plot[{f[x],g[x],h[x]},{x,1,3}]

k[x_]=f[2]+f'[2](x-2)+(1/2)f''[2](((x-2))^2)+(1/(2 3))f'''[2](((x-2))^3)

Plot[{f[x],g[x],h[x],k[x]},{x,-5,5}]

Plot[{f[x],g[x],h[x],k[x]},{x,1,3}]