clear all; close all; clc;
load TOP_PROF
fechas = ['28Nov12';'03Dic12';'11Dic12';'26Dic12';'09Ene13';'24Ene13';'07Feb13';'21Feb13';'07Mar13';'19Sep13';'03Oct13';'17Oct13';'03Nov13';'18Nov13';'05Dic13';'17Dic13';'30Ene14';'13Feb14';'24Feb14';'03Mar14';'11Mar14';'22Abr14';'06May14';'20May14';'17Jun14';'15Jul14';'12Ago14';'10Sep14';'08Oct14';'06Nov14'...
;'24Nov14';'04Dic14';'18Dic14';'07Ene15';'20Ene15';'17Feb15';'17Mar15';'04Jun15';'17Jun15';'16Jul15';'03Ago15';'01Sep15';'29Sep15';'26Oct15';'25Nov15';'09Dic15';'19Ene16';'05Feb16';'08Mar16'];
tamano=get(0,'ScreenSize');
figure('position',[tamano(1) tamano(2) tamano(3) tamano(4)]);
for i=[16,17,19,20,21,22,23,29];
eval(['M=TOP_PROF.tp_',fechas(i,:),';'])
for r =15
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(221)
ValueArray = {'-b','-r','-*b','-*r','-.b','-.r','--b','--r'}';
for i=1:8
plot(x,z,ValueArray{i})
end
hold on
legend ('T8 antes','T8 después','T9 antes', 'T9 después', 'T10 antes','T10 después','T11 antes','T11 después','T12 antes','T12 después')
for r =30
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(222)
set(groot,'defaultAxesColorOrder',[0 0 1;1 0 0],...
'defaultAxesLineStyleOrder','-|-*')
plot(x,z)
legend ('T8 antes','T8 después','T9 antes', 'T9 después', 'T10 antes','T10 después','T11 antes','T11 después','T12 antes','T12 después')
hold on
for r =45
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(223)
plot(x,z)
legend ('T8 antes','T8 después','T9 antes', 'T9 después', 'T10 antes','T10 después','T11 antes','T11 después','T12 antes','T12 después')
hold on
for r =60
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(224)
plot(x,z)
legend ('T8 antes','T8 después','T9 antes', 'T9 después', 'T10 antes','T10 después','T11 antes','T11 después','T12 antes','T12 después')
hold on
end
end
end
end
end
tamano=get(0,'ScreenSize');
figure('position',[tamano(1) tamano(2) tamano(3) tamano(4)]);
for i=[30,32,33,34,35,36,37,38,46,47];
eval(['M=TOP_PROF.tp_',fechas(i,:),';'])
for r =15
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(221)
plot(x,z)
hold on
for r =30
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(222)
plot(x,z)
hold on
for r =45
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(223)
plot(x,z)
hold on
for r =60
eval(['g=M.P',num2str(r),';'])
x = g(:,1);
y = g(:,2);
z = g(:,3);
subplot(224)
plot(x,z)
hold on
end
end
end
end
end