1 | % |
---|
2 | %+ |
---|
3 | % |
---|
4 | % EVOLUTIONS |
---|
5 | % =========== |
---|
6 | % |
---|
7 | % $Id$ |
---|
8 | % |
---|
9 | % - fplod 2009-02-02T09:59:01Z aedon.locean-ipsl.upmc.fr (Darwin) |
---|
10 | % |
---|
11 | % * replaced by time_serie_eof_df.m |
---|
12 | % |
---|
13 | %- |
---|
14 | |
---|
15 | clear; |
---|
16 | close all; |
---|
17 | |
---|
18 | status=load('eof_1030_ircaam.mat','C','olr'); |
---|
19 | C=status.C; |
---|
20 | olr=status.olr; |
---|
21 | clear status; |
---|
22 | |
---|
23 | olr=olr'; |
---|
24 | PC1=olr*C; |
---|
25 | |
---|
26 | %%%%%%% cronique de la VP1 |
---|
27 | time_serie_olr1=PC1(:,360); |
---|
28 | time_serie_olr2=PC1(:,359); |
---|
29 | |
---|
30 | dt_olr1=std(time_serie_olr1); |
---|
31 | dt_olr2=std(time_serie_olr2); |
---|
32 | |
---|
33 | for a=1:3538; |
---|
34 | time_serie_olr1(a)=time_serie_olr1(a)/dt_olr1; |
---|
35 | time_serie_olr2(a)=time_serie_olr2(a)/dt_olr2; |
---|
36 | end; |
---|
37 | |
---|
38 | save('eof1_AFR_1030.txt','time_serie_olr1','-ASCII'); |
---|
39 | save('eof2_AFR_1030.txt','time_serie_olr2','-ASCII'); |
---|
40 | |
---|
41 | x=[1:3538]'; |
---|
42 | for a=1:29; |
---|
43 | if a<12; |
---|
44 | figure(1); |
---|
45 | subplot(4,3,a); |
---|
46 | elseif a<23; |
---|
47 | figure(2); |
---|
48 | subplot(4,3,a-11); |
---|
49 | else |
---|
50 | figure(3); |
---|
51 | subplot(4,3,a-22); |
---|
52 | end; |
---|
53 | clear koro1; |
---|
54 | debut=(a-1)*122+1; |
---|
55 | fin=a*122; |
---|
56 | koro1=time_serie_olr1(debut:fin); |
---|
57 | koro2=time_serie_olr2(debut:fin); |
---|
58 | clear x; |
---|
59 | x=[1:122]'; |
---|
60 | plot(x,koro1,'r'); |
---|
61 | hold on |
---|
62 | plot(x,koro2,'k'); |
---|
63 | y=zeros(122,1); |
---|
64 | plot(x,y,'k:'); |
---|
65 | title(a+1970,'FontSize',8); |
---|
66 | if a==2; |
---|
67 | text(0,5.5,'serie temporelle eof AFR 1030'); |
---|
68 | elseif a==13; |
---|
69 | text(0,5.5,'serie temporelle eof AFR 1030'); |
---|
70 | elseif a==24; |
---|
71 | text(0,5.5,'serie temporelle eof AFR 1030'); |
---|
72 | end; |
---|
73 | set (gca,'tickDir','out'); |
---|
74 | axis([1 122 -3 3]); |
---|
75 | |
---|
76 | set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); |
---|
77 | set (gca,'XTick',[0:20:120],'XTickLabel',[0:20:120],'fontname','Arial','fontsize',6); |
---|
78 | end; |
---|
79 | |
---|
80 | figure(1); |
---|
81 | print('-depsc2','time_serie_eof_afr_1030a.eps'); |
---|
82 | figure(2); |
---|
83 | print('-depsc2','time_serie_eof_afr_1030b.eps'); |
---|
84 | figure(3); |
---|
85 | print('-depsc2','time_serie_eof_afr_1030c.eps'); |
---|