source: trunk/src/SIMULS_IRCAAM/time_serie_as_30100.m @ 15

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

modification according to mlint diagnostic

File size: 1.5 KB
Line 
1clear;
2close all;
3
4load eof_30100_ircaam_as.mat
5
6olr=olr';
7PC1=olr*C;
8
9
10%%%%%%% cronique de la VP1
11time_serie_olr1=PC1(:,360);
12time_serie_olr2=PC1(:,359);
13
14dt_olr1=std(time_serie_olr1);
15dt_olr2=std(time_serie_olr2);
16
17
18for a=1:3538;
19   time_serie_olr1(a)=time_serie_olr1(a)/dt_olr1;
20   time_serie_olr2(a)=time_serie_olr2(a)/dt_olr2;
21end
22
23save eof1_AS_30100.txt time_serie_olr1 -ascii;
24save eof2_AS_30100.txt time_serie_olr2 -ascii;
25
26x=[1:3538]';
27for a=1:29;
28   if a<12;
29      figure(1); subplot(4,3,a);
30   elseif a<23;
31      figure(2); subplot(4,3,a-11);
32   else
33      figure(3); subplot(4,3,a-22);
34   end
35   clear koro1
36   debut=(a-1)*122+1;
37   fin=a*122;
38   koro1=time_serie_olr1(debut:fin);
39   koro2=time_serie_olr2(debut:fin);
40   clear x; x=[1:122]';
41   plot(x,koro1,'r');
42   hold on
43   plot(x,koro2,'k');
44   y=zeros(122,1);
45   plot(x,y,'k:');
46   title(a+1970,'FontSize',8);
47   if a==2;
48       text(0,5.5,'serie temporelle eof AS 30100');
49    elseif a==13;
50       text(0,5.5,'serie temporelle eof AS 30100');
51   elseif a==24;
52       text(0,5.5,'serie temporelle eof AS 30100');
53   end;
54   set (gca,'tickDir','out');
55   axis([1 122 -3 3]);
56   
57
58   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
59set (gca,'XTick',[0:20:120],'XTickLabel',[0:20:120],'fontname','Arial','fontsize',6);
60end;
61
62figure(1); print -depsc2 time_serie_eof_as_30100a.eps;
63figure(2); print -depsc2 time_serie_eof_as_30100b.eps;
64figure(3); print -depsc2 time_serie_eof_as_30100c.eps;
65
Note: See TracBrowser for help on using the repository browser.