source: trunk/src/mode_sahelien/time_serie_ER_rossby_30100.m @ 23

Last change on this file since 23 was 23, checked in by pinsard, 15 years ago

replace fcommands save, load and print by function calls

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