function [ y ] = polynom( ~ )
%UNTITLED7 Summary of this function goes here
%   Detailed explanation goes here
p=[0.0000037646 0.000003 457.5641];
x=0:10:4000;
y=polyval(p,x);
figure(1);
plot(x,y);

end