source: trunk/src/SIMULS_IRCAAM/time_serie_as_1030.m @ 18

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

squeeze multiple blank lines

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