fplot([T6 T8 T10 f])
xlim([-4 4])
grid on
legend("approximation of sin(x)/x with error O(x^6)", ..."approximation of sin(x)/x with error O(x^8)", ..."approximation of sin(x)/x with error O(x^{10})", ..."sin(x)/x",Location="Best")
title("Taylor Series Expansion")