%% mma 20
p=[1 -7 11 7 -10]
x0=roots(p)
dp=polyder(p)
dx0=roots(dp)
%%
x=linspace(-1,4);
plot(x,polyval(p,x))
grid on
shg

hold on

plot(x,polyval(dp,x),'r')
