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