source: trunk/src/mode_sahelien/time_serie_ER_rossby_1030.m @ 16

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

remove trailing blanks, split lines with multiple statements

File size: 1.2 KB
Line 
1%
2
3clear;
4
5load eof_rossby_jjas_2006_1030.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_1030=zeros(3416,4);
28for a=1:3416;
29     for b=1:4;
30        table_ER_1030(a,1)=year(a);
31        table_ER_1030(a,2)=day(a);
32        table_ER_1030(a,3)=time_serie_olr1(a);
33        table_ER_1030(a,4)=time_serie_olr2(a);
34     end;
35end;
36
37save table_ER_1030.txt table_ER_1030 -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
58
59set (gca,'YTick',[-100:20:100],'YTickLabel',[-100:20:100],'fontname','Arial','fontsize',6);
60set (gca,'XTick',[0:20:120],'XTickLabel',[0:20:120],'fontname','Arial','fontsize',6);
61
Note: See TracBrowser for help on using the repository browser.