clear all
%problem 1
c=0:9;
time=[130 115 110 90 89 88 95 100 112 125];
coef=polyfit(c,time,3);
x=0:0.1:9;
fit=polyval(coef,x);
plot(c,time,'o',x,fit)
fit
min(fit)
x(48)
pause
clear all
%problem 2
temp=400:100:1400
heat=[.990 1.017 1.052 1.089 1.157 1.259 1.306 1.220 1.095 .998 .926]
coef=polyfit(temp,heat,10)
plot(temp,heat,'o')
polyval(coef,750)
spline(temp,heat,750)


