IGP_CLIMPEZ/ordenar_temp2.m at main · danliba/IGP_CLIMPEZ · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
clear all; close all; clc;
%%
cd D:\trabajo\IGP\CLIM_PEZ\Dra_Jaramillos\datos2

%% datos
[data_max,raw_max,j_max]=xlsread('CO_Tamshiyacu_D.xlsx','max_bd');
[data_min,raw_min,j_min]=xlsread('CO_Tamshiyacu_D.xlsx','min_bd');

%%
datos_min=data_min(1:end,2:end);
datos_max=data_max(1:end,2:end);

%%
iter=0;
for iy=1971:1:2021
    iter=iter+1;
    jj=0;
    for ii=1:1:size(datos_min,2)
        jj=jj+1;
        %pp(jj,:)=cat(2,iy,ii,datos_p(iter,ii));
        tmin(jj,:)=cat(2,iy,ii,datos_min(iter,ii));
        tmax(jj,:)=cat(2,iy,ii,datos_max(iter,ii));
    end
    %PPm{iter,:}=pp;
    TTmin{iter,:}=tmin;
    TTmax{iter,:}=tmax;
end
%%
%TAp=cell2mat(PPm);
TAmin=cell2mat(TTmin);
TAmax=cell2mat(TTmax);

TAm=table(TAmax(:,1),TAmax(:,2),TAmax(:,3),TAmin(:,3));
TAm.Properties.VariableNames{3} = 'max';
TAm.Properties.VariableNames{4} = 'min';
%TAm.Properties.VariableNames{5} = 'max';

 my_file=['datos_ordenamos_TempAire.xlsx'];
writetable(TAm,my_file,'Sheet',1);

%% Requena
clear all; close all; clc;
%% datos
[data_max,raw_max,j_max]=xlsread('CO Requena D.xlsx','bd_max');
[data_min,raw_min,j_min]=xlsread('CO Requena D.xlsx','bd_min');

%%
datos_min=data_min(1:end,2:end);
datos_max=data_max(1:end,2:end);

%%
iter=0;
for iy=data_max(1,1):1:2021
    iter=iter+1;
    jj=0;
    for ii=1:1:size(datos_min,2)
        jj=jj+1;
        %pp(jj,:)=cat(2,iy,ii,datos_p(iter,ii));
        tmin(jj,:)=cat(2,iy,ii,datos_min(iter,ii));
        tmax(jj,:)=cat(2,iy,ii,datos_max(iter,ii));
    end
    %PPm{iter,:}=pp;
    TTmin{iter,:}=tmin;
    TTmax{iter,:}=tmax;
end
%%
%TAp=cell2mat(PPm);
TAmin=cell2mat(TTmin);
TAmax=cell2mat(TTmax);

TAm=table(TAmax(:,1),TAmax(:,2),TAmax(:,3),TAmin(:,3));
TAm.Properties.VariableNames{3} = 'max';
TAm.Properties.VariableNames{4} = 'min';
%TAm.Properties.VariableNames{5} = 'max';

 my_file=['datos_ordenamos_TempAire.xlsx'];
writetable(TAm,my_file,'Sheet',2);

%% San Regis
clear all; close all; clc;
%% datos
[data_max,raw_max,j_max]=xlsread('PE San Regis D.xlsx','bd_max');
[data_min,raw_min,j_min]=xlsread('PE San Regis D.xlsx','bd_min');

%%
datos_min=data_min(1:end,2:end);
datos_max=data_max(1:end,2:end);

%%
iter=0;
for iy=data_max(1,1):1:2021
    iter=iter+1;
    jj=0;
    for ii=1:1:size(datos_min,2)
        jj=jj+1;
        %pp(jj,:)=cat(2,iy,ii,datos_p(iter,ii));
        tmin(jj,:)=cat(2,iy,ii,datos_min(iter,ii));
        tmax(jj,:)=cat(2,iy,ii,datos_max(iter,ii));
    end
    %PPm{iter,:}=pp;
    TTmin{iter,:}=tmin;
    TTmax{iter,:}=tmax;
end
%%
%TAp=cell2mat(PPm);
TAmin=cell2mat(TTmin);
TAmax=cell2mat(TTmax);

TAm=table(TAmax(:,1),TAmax(:,2),TAmax(:,3),TAmin(:,3));
TAm.Properties.VariableNames{3} = 'max';
TAm.Properties.VariableNames{4} = 'min';
%TAm.Properties.VariableNames{5} = 'max';

 my_file=['datos_ordenamos_TempAire.xlsx'];
writetable(TAm,my_file,'Sheet',3);