1 | % |
---|
2 | |
---|
3 | clear; |
---|
4 | |
---|
5 | status=load('eof_rossby_jjas_2006_30100.mat'); |
---|
6 | olr=olr'; |
---|
7 | PC1=olr*C; |
---|
8 | |
---|
9 | time_serie_olr1=PC1(:,425); |
---|
10 | time_serie_olr2=PC1(:,424); |
---|
11 | year=zeros(122,28); |
---|
12 | for a=1:122 |
---|
13 | for b=1:28; |
---|
14 | year(a,b)=1979+(b-1); |
---|
15 | end; |
---|
16 | end; |
---|
17 | year=reshape(year,3416,1); |
---|
18 | |
---|
19 | day=zeros(122,28); |
---|
20 | for a=1:122 |
---|
21 | for b=1:28; |
---|
22 | day(a,b)=31+28+31+30+31+a; |
---|
23 | end; |
---|
24 | end; |
---|
25 | day=reshape(day,3416,1); |
---|
26 | |
---|
27 | table_ER_30100=zeros(3416,4); |
---|
28 | for a=1:3416; |
---|
29 | for b=1:4; |
---|
30 | table_ER_30100(a,1)=year(a); |
---|
31 | table_ER_30100(a,2)=day(a); |
---|
32 | table_ER_30100(a,3)=time_serie_olr1(a); |
---|
33 | table_ER_30100(a,4)=time_serie_olr2(a); |
---|
34 | end; |
---|
35 | end; |
---|
36 | |
---|
37 | status=save('table_ER_30100.txt','table_ER_30100','-ASCII'); |
---|
38 | |
---|
39 | a=1; |
---|
40 | clear koro1 |
---|
41 | debut=(a-1)*122+1; |
---|
42 | fin=a*122; |
---|
43 | koro1=time_serie_olr1(debut:fin); |
---|
44 | koro2=time_serie_olr2(debut:fin); |
---|
45 | x=[1:122]'; |
---|
46 | aa=plot(x,-koro1,'r'); |
---|
47 | hold on; |
---|
48 | bb=plot(x,-koro2,'k'); |
---|
49 | cc=legend('EOF1','EOF2') |
---|
50 | set (cc,'fontsize',6) |
---|
51 | legend boxoff |
---|
52 | y=zeros(122,1); |
---|
53 | plot(x,y,'k:'); |
---|
54 | |
---|
55 | set (gca,'tickDir','out'); |
---|
56 | axis([1 122 -100 100]); |
---|
57 | |
---|
58 | set (gca,'YTick',[-100:20:100],'YTickLabel',[-100:20:100],'fontname','Arial','fontsize',6); |
---|
59 | set (gca,'XTick',[0:20:120],'XTickLabel',[0:20:120],'fontname','Arial','fontsize',6); |
---|