1 | %
|
---|
2 |
|
---|
3 | clear;
|
---|
4 | load eof_1030_ircaam_ctl.mat
|
---|
5 | carte1=C(:,360);
|
---|
6 |
|
---|
7 | carte=reshape(carte1,24,15);
|
---|
8 | carte=carte';
|
---|
9 |
|
---|
10 | clear carte1;
|
---|
11 | % defintion des lat et lon
|
---|
12 | cd('CTL')
|
---|
13 | ncload('rlut_d.CtIV.197106-09.nc','lat','lon');
|
---|
14 | cd('..');
|
---|
15 | lon=lon-180;
|
---|
16 | lon=lon(54:77);
|
---|
17 | lat=lat(29:43)';
|
---|
18 |
|
---|
19 | figure(1);
|
---|
20 | orient('landscape');
|
---|
21 | subplot(3,2,1);
|
---|
22 | palette;
|
---|
23 | for a=1:15;
|
---|
24 | for b=1:24;
|
---|
25 | if carte(a,b)>0.2;
|
---|
26 | carte(a,b)=0.2;
|
---|
27 | elseif carte(a,b)<-0.2;
|
---|
28 | carte(a,b)=-0.2;
|
---|
29 | end;
|
---|
30 | end;
|
---|
31 | end;
|
---|
32 | carte(1,1)=-0.2001;
|
---|
33 | carte(1,2)=0.2001;
|
---|
34 |
|
---|
35 | contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
|
---|
36 | colorbar;
|
---|
37 | title('OLR EOF1','Fontsize',8);
|
---|
38 | hold on;
|
---|
39 | cartemonde;
|
---|
40 | set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';' 0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
|
---|
41 | set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';' 0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
|
---|
42 | set (gca,'tickDir','out');
|
---|
43 |
|
---|
44 | clear carte1 x y a b carte coco;
|
---|
45 | carte1=C(:,359);
|
---|
46 | carte=reshape(carte1,24,15);
|
---|
47 | carte=carte';
|
---|
48 |
|
---|
49 | clear carte1;
|
---|
50 |
|
---|
51 | subplot(3,2,3);
|
---|
52 | palette;
|
---|
53 | for a=1:15;
|
---|
54 | for b=1:24;
|
---|
55 | if carte(a,b)>0.2;
|
---|
56 | carte(a,b)=0.2;
|
---|
57 | elseif carte(a,b)<-0.2;
|
---|
58 | carte(a,b)=-0.2;
|
---|
59 | end;
|
---|
60 | end;
|
---|
61 | end;
|
---|
62 | carte(1,1)=-0.2001;
|
---|
63 | carte(1,2)=0.2001;
|
---|
64 |
|
---|
65 | contourf(lon,lat,carte,[-0.2:0.02:0.2],'LineStyle','none');
|
---|
66 | colorbar;
|
---|
67 |
|
---|
68 | title('OLR EOF2','Fontsize',8);
|
---|
69 | hold on;
|
---|
70 | cartemonde;
|
---|
71 | set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';' 0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
|
---|
72 | set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';' 0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
|
---|
73 | set (gca,'tickDir','out');
|
---|
74 |
|
---|
75 | clear carte1 x y a b carte coco;
|
---|
76 | carte1=C(:,358);
|
---|
77 | carte=reshape(carte1,24,15);
|
---|
78 | carte=carte';
|
---|
79 | clear carte1;
|
---|
80 |
|
---|
81 | subplot(3,2,5);
|
---|
82 | palette;
|
---|
83 | for a=1:15;
|
---|
84 | for b=1:24;
|
---|
85 | if carte(a,b)>0.2;
|
---|
86 | carte(a,b)=0.2;
|
---|
87 | elseif carte(a,b)<-0.2;
|
---|
88 | carte(a,b)=-0.2;
|
---|
89 | end;
|
---|
90 | end;
|
---|
91 | end;
|
---|
92 | carte(1,1)=-0.2001;
|
---|
93 | carte(1,2)=0.2001;
|
---|
94 |
|
---|
95 | contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
|
---|
96 | colorbar;
|
---|
97 | title('OLR EOF3','Fontsize',8);
|
---|
98 | hold on;
|
---|
99 | cartemonde;
|
---|
100 | set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';' 0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
|
---|
101 | set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';' 0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
|
---|
102 | set (gca,'tickDir','out');
|
---|
103 |
|
---|
104 |
|
---|
105 |
|
---|
106 | clear carte1 x y a b carte coco;
|
---|
107 | carte1=C(:,357);
|
---|
108 | carte=reshape(carte1,24,15);
|
---|
109 | carte=carte';
|
---|
110 | clear carte1;
|
---|
111 |
|
---|
112 | subplot(3,2,2);
|
---|
113 | palette;
|
---|
114 | for a=1:15;
|
---|
115 | for b=1:24;
|
---|
116 | if carte(a,b)>0.2;
|
---|
117 | carte(a,b)=0.2;
|
---|
118 | elseif carte(a,b)<-0.2;
|
---|
119 | carte(a,b)=-0.2;
|
---|
120 | end;
|
---|
121 | end;
|
---|
122 | end;
|
---|
123 | carte(1,1)=-0.2001;
|
---|
124 | carte(1,2)=0.2001;
|
---|
125 |
|
---|
126 | contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
|
---|
127 | colorbar;
|
---|
128 | title('OLR EOF4','Fontsize',8);
|
---|
129 | hold on;
|
---|
130 | cartemonde;
|
---|
131 | set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';' 0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
|
---|
132 | set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';' 0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
|
---|
133 | set (gca,'tickDir','out');
|
---|
134 |
|
---|
135 | subplot(3,2,4);
|
---|
136 | vaude=0;
|
---|
137 | for a=1:360;
|
---|
138 | vaude=vaude+L(a,a);
|
---|
139 | end
|
---|
140 | vecteurs=zeros(20,1);
|
---|
141 | for a=1:20;
|
---|
142 | b=360-(a-1);
|
---|
143 | vecteurs(a)=100*(L(b,b)/vaude);
|
---|
144 | end
|
---|
145 | x=[1:20]';
|
---|
146 |
|
---|
147 | bar(x,vecteurs,'LineStyle','none')
|
---|
148 | axis([0.5 20.5 0 25]);
|
---|
149 | set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
|
---|
150 | set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
|
---|
151 | set (gca,'tickDir','out');
|
---|
152 |
|
---|
153 | print -depsc2 eof_ircaam_1030_ctl.eps;
|
---|