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