hold off;
clf;
clear all;

data=dlmread("annpop.csv");

% d1=data(1:100,:);
% plot(d1(:,1),d1(:,2))

% p1=polyfit(d1(:,1),d1(:,2),1);
% hold on

% d2=data(1:200,:);
% plot(d2(:,1),d2(:,2))
% plot([d2(1,1),d2(end,1)], polyval(p1, [d2(1,1),d2(end,1)]))

% p2=polyfit(d2(:,1),d2(:,2),2);
% xx=linspace(d2(1,1),d2(end,1),200);
% plot(xx, polyval(p2, xx))

d3=data(1:300,:);
plot(d3(:,1),d3(:,2))
hold on

T=d3(:,1);
size(T)
F=log(d3(:,2));
x=polyfit(T,F,1);
x=[exp(x(1)),x(2)]

xx=linspace(1700,1999,500);
plot(xx,x(1)*exp(x(2)*xx),'*')








