x=poly([-4 2 1],'t','c')
a=horner(x,0)
b=horner(x,-2)
disp(a)
disp(b)