% C I Y PI R z W
data = xlsread('amazone');
C = data(:,1);
I = data(:,2);
Y = data(:,3);
pi = data(:,4);
R = data(:,5);
z = data(:,6);
w = data(:,7);

%mean(R)
%mean(pi)
%mean(pi)/mean(R)


% disp('C')
C = 100*DetrendDataSet(C,1,1);
% disp('I')
I = 100*DetrendDataSet(I,1,1);
% disp('Y')
[Y,AY] = DetrendDataSet(Y,1,1);
Y=100*Y;
% disp('pi')
pi = 100*DetrendDataSet(pi,1,1);
% disp('R')
R = 100*DetrendDataSet(R,1,1);
% disp('w')
w = 100*DetrendDataSet(w,1,1);
% disp('z')
z = 100*DetrendDataSet(z,1,1);

figure('Name','consommation')
plot(data(:,1))

figure('Name','investissement')
plot(data(:,2))

figure('Name','produit')
plot(data(:,3))

figure('Name','inflation')
plot(data(:,4))

figure('Name','taux d''intérêt')
plot(data(:,5))

figure('Name','salaire réel')
plot(data(:,7))

%figure('Name','Taux d''intérêt réel 2')
%plot(R(1:end-1)-pi(2:end));

figure('Name','TUC')
plot(data(:,6));