clear all;
A = rand(2,2);
B = rand(5,5);

save matrices;
save matA A;

clear all;
load matrices;

whos;

clear all;
load matA;

whos;

datos = 100 + 5*randn(100,5);
save datos.txt datos -ascii;

datos = xlsread('PIBChile.xlsx','Datos','A2:B57');

tiempo = datos(:,1);
pib = datos(:,2);

plot(tiempo,pib);
title('PIB Real de Chile');
ylabel('Miles de Millones de Pesos Encadenados');
xlabel('Año');
set(gca,'FontSize',8);

T = length(pib);
g = ((pib(2:T,1) - pib(1:T-1,1))./pib(1:T-1,1))*100;

plot(tiempo(2:T),g);
title('Crecimiento del PIB Real de Chile');
ylabel('Porcentaje');
xlabel('Año');
set(gca,'FontSize',8);

crecprom = mean(g)