1 | %
|
---|
2 |
|
---|
3 | clear;
|
---|
4 | close all;
|
---|
5 |
|
---|
6 | %lon=[-30:2.5:30], lat=[-10:2.5:30]
|
---|
7 |
|
---|
8 | load eof_1030_jjas.mat;
|
---|
9 | olr=olr';
|
---|
10 | PC1=olr*C;
|
---|
11 |
|
---|
12 | cosa=zeros(4,3416,425);
|
---|
13 | % boucle sur les VP
|
---|
14 | for a=1:4;
|
---|
15 | for b=1:3416 % boucle sur le temps
|
---|
16 | for c=1:425 % boucle sur l espace
|
---|
17 | cosa(a,b,c)=PC1(b,426-a)*C(c,426-a);
|
---|
18 | end;
|
---|
19 | end;
|
---|
20 | end;
|
---|
21 |
|
---|
22 | cosa1(:,:)=cosa(1,:,:);
|
---|
23 | cosa1=reshape(cosa1,3416,25,17);
|
---|
24 |
|
---|
25 | cosa2(:,:)=cosa(2,:,:);
|
---|
26 | cosa2=reshape(cosa2,3416,25,17);
|
---|
27 |
|
---|
28 | cosabis=cosa(2:3,:,:);
|
---|
29 | cosa23(:,:)=sum(cosabis);
|
---|
30 | clear cosabis;
|
---|
31 | cosa23=reshape(cosa23,3416,25,17);
|
---|
32 |
|
---|
33 | cosabis=cosa(2:4,:,:);
|
---|
34 | cosa24(:,:)=sum(cosabis);
|
---|
35 | clear cosabis;
|
---|
36 | cosa24=reshape(cosa24,3416,25,17);
|
---|
37 |
|
---|
38 | figure(1);
|
---|
39 | orient('landscape')
|
---|
40 | figure(2);
|
---|
41 | orient('landscape')
|
---|
42 | figure(3);
|
---|
43 | orient('landscape')
|
---|
44 |
|
---|
45 | % On selectionne la demaine geographique
|
---|
46 |
|
---|
47 | % la latitude : 7.5N (8) 12.5N (10)
|
---|
48 | % la longitude : 10W (9) 10E(17)
|
---|
49 | lat1=8;
|
---|
50 | lat2=10;
|
---|
51 | lon1=9;
|
---|
52 | lon2=17;
|
---|
53 | taille=(lat2-lat1+1)*(lon2-lon1+1);
|
---|
54 |
|
---|
55 | cosa23=cosa23(:,lon1:lon2,lat1:lat2);
|
---|
56 | clear cosi2;
|
---|
57 | cosa23=reshape(cosa23,3416,taille);
|
---|
58 | cosa23=cosa23';
|
---|
59 | cosa23=mean(cosa23);
|
---|
60 | cosa23=cosa23';
|
---|
61 | save eof23_1030.txt cosa23 -ascii;
|
---|
62 | cosa23=reshape(cosa23,122,28);
|
---|
63 |
|
---|
64 | cosa24=cosa24(:,lon1:lon2,lat1:lat2);
|
---|
65 | clear cosi2;
|
---|
66 | cosa24=reshape(cosa24,3416,taille);
|
---|
67 | cosa24=cosa24';
|
---|
68 | cosa24=mean(cosa24);
|
---|
69 | cosa24=cosa24';
|
---|
70 | save eof24_1030.txt cosa24 -ascii;
|
---|
71 | cosa24=reshape(cosa24,122,28);
|
---|
72 |
|
---|
73 |
|
---|
74 |
|
---|
75 |
|
---|
76 | % On selectionne la demaine geographique
|
---|
77 | olr=reshape(olr,3416,25,17);
|
---|
78 | cosa4=olr(:,lon1:lon2,lat1:lat2);
|
---|
79 | clear olr;
|
---|
80 | cosa4=reshape(cosa4,3416,taille);
|
---|
81 | clear taille;
|
---|
82 | cosa4=cosa4';
|
---|
83 | cosa4=mean(cosa4);
|
---|
84 | cosa4=cosa4';
|
---|
85 | cosa4=reshape(cosa4,122,28);
|
---|
86 |
|
---|
87 | for a=1:28;
|
---|
88 | if a<12;
|
---|
89 | figure(1);
|
---|
90 | subplot(4,3,a);
|
---|
91 | elseif a<24
|
---|
92 | figure(2);
|
---|
93 | subplot(4,3,a-11);
|
---|
94 | else
|
---|
95 | figure(3);
|
---|
96 | subplot(4,3,a-23);
|
---|
97 | end
|
---|
98 | y2=cosa23(:,a);
|
---|
99 | y4=cosa4(:,a);
|
---|
100 | x=[1:122]';
|
---|
101 | plot(x,y2);
|
---|
102 | hold on;
|
---|
103 | plot(x,y4,'k');
|
---|
104 | y5=zeros(122,1);
|
---|
105 | plot(x,y5,'k:');
|
---|
106 |
|
---|
107 | title(a+1978,'Fontsize',8);
|
---|
108 | if a==2;
|
---|
109 | text(0,65,'OLR 7.5 -12.5N et 10W - 10E');
|
---|
110 | elseif a==13;
|
---|
111 | text(0,65,'OLR 7.5 -12.5N et 10W - 10E');
|
---|
112 | end
|
---|
113 | set (gca,'tickDir','out');
|
---|
114 | if a==11;
|
---|
115 | aa=legend('OLR VP2-3','OLR NOAA');
|
---|
116 | set (aa,'fontsize',8,'Position',[0.6800 0.1039 0.2470 0.1642])
|
---|
117 | legend boxoff;
|
---|
118 | elseif a==22;
|
---|
119 | clear aa;
|
---|
120 | aa=legend('OLR VP2-3','OLR NOAA');
|
---|
121 | set (aa,'fontsize',8,'Position',[0.6800 0.1039 0.2470 0.1642])
|
---|
122 | legend boxoff;
|
---|
123 | end;
|
---|
124 | axis([1 122 -15 15]);
|
---|
125 | set (gca,'YTick',[-15:5:15],'YTickLabel',[-15:5:15],'fontname','Arial','fontsize',6);
|
---|
126 | set (gca,'XTick',[10:10:122],'XTickLabel',[10:10:122],'fontname','Arial','fontsize',6);
|
---|
127 |
|
---|
128 | end;
|
---|
129 |
|
---|
130 | figure(1);
|
---|
131 | print -depsc2 reconstitution1_eof23_filtreER_1030.eps;
|
---|
132 | figure(2);
|
---|
133 | print -depsc2 reconstitution2_eof23_filtreER_1030.eps;
|
---|
134 | figure(3);
|
---|
135 | print -depsc2 reconstitution3_eof23_filtreER_1030.eps;
|
---|