%% Taylor-udviklinger laves med følgende kommando

syms x
T1 = taylor( log(x), x, 'ExpansionPoint', 1, 'Order', 5 )

%% Plot polynomiet og logaritme-funktionen

ezplot( T1, [0.2, 2.5] );
hold all
ezplot( log(x), [0.2, 2.5] );
hold off

legend('T1', 'log(x)', 'Location', 'SouthEast')

%% Her er et lidt mere avanceret eksempel

h = figure;
hold all

ezplot( sin(x), [-2*pi, 2*pi] );

for k = 1:4
    ezplot( taylor( sin(x), x, 'Order', k+1 ), [-2*pi, 2*pi] );
end

hold off

axis( [-2*pi 2*pi -3 3] )

legend('sin(x)', 'T1', 'T2', 'T3', 'Location', 'SouthWest')