Example of Fig 5.12 - 5.13

Combined EOF

function example51213
%
%  Combined EOF for SST and Z
%

sflat = [-30 30];
sflon = [120 300];
zflat = [0 90];
zflon = [120 360];
lnorm = 'full';


[st,inds,fcos]=readsst(sflat,sflon,'season','jfm','scaling','yes');
[zt,indz,fcos]=readz500(zflat,zflon,'season','jfm','scaling','yes');

[z,sdz]=anomaly(zt,lnorm);
[s,sdz]=anomaly(st,lnorm);

zz = [ z; s];

[u,lam,v,proj]=combeof(zz,inds,indz,3,1);


% PLot EOF  -----
titstr=cell(size(1:3));

figure(1)
clf;
modeindex=[ 1 2 3];
for i=1:3
    ii=modeindex(i);
    titstr{i} = [' EOF Mode Z Component ' num2str(ii) '    ' num2str(lam(ii)*100,'%-2.0f') '%'];
end
bigtit{1}= ['   ' ];
bigtit{2}= 'Combined EOF';

pict3(bigtit,u(:,modeindex(1)),u(:,modeindex(2)), u(:,modeindex(3)), ...
    zflat,zflon,[-0.05:0.01:0.05],titstr,'shading','off');
print('-dpdf','-painters',[mfilename 'Z.pdf']);

figure(2)
clf;
modeindex=[ 1 2 3];
for i=1:3
    ii=modeindex(i);
    titstr{i} = [' EOF Mode S Component ' num2str(ii) '    ' num2str(lam(ii)*100,'%-2.0f') '%'];
end
bigtit{1}= ['   ' ];
bigtit{2}= 'Combined EOF';

pict3(bigtit,v(:,modeindex(1)),v(:,modeindex(2)), v(:,modeindex(3)), ...
    sflat,sflon,[-0.05:0.01:0.05],titstr,'shading','off');
print('-dpdf','-painters',[mfilename 'S.pdf']);
Normalization full
Normalization full
Expanded Field
Shading is  off 
Reshaping for T30 Gaussian grid
Contouring from a minimum -0.0500 
Contouring to a maximum 0.0500 
Contouring interval is  0.0100 
Contour values are: 
-0.0500 -0.0400 -0.0300 -0.0200 -0.0100 0.0000 0.0100 0.0200 0.0300 0.0400 0.0500 
Maximum field value 0.0333 
Minimum field value -0.0344 
Shading is  off 
Reshaping for T30 Gaussian grid
Contouring from a minimum -0.0500 
Contouring to a maximum 0.0500 
Contouring interval is  0.0100 
Contour values are: 
-0.0500 -0.0400 -0.0300 -0.0200 -0.0100 0.0000 0.0100 0.0200 0.0300 0.0400 0.0500 
Maximum field value 0.0403 
Minimum field value -0.0369 
Shading is  off 
Reshaping for T30 Gaussian grid
Contouring from a minimum -0.0500 
Contouring to a maximum 0.0500 
Contouring interval is  0.0100 
Contour values are: 
-0.0500 -0.0400 -0.0300 -0.0200 -0.0100 0.0000 0.0100 0.0200 0.0300 0.0400 0.0500 
Maximum field value 0.0257 
Minimum field value -0.0621 
Shading is  off 
Reshaping for T30 Gaussian grid
Contouring from a minimum -0.0500 
Contouring to a maximum 0.0500 
Contouring interval is  0.0100 
Contour values are: 
-0.0500 -0.0400 -0.0300 -0.0200 -0.0100 0.0000 0.0100 0.0200 0.0300 0.0400 0.0500 
Maximum field value 0.0276 
Minimum field value -0.0320 
Shading is  off 
Reshaping for T30 Gaussian grid
Contouring from a minimum -0.0500 
Contouring to a maximum 0.0500 
Contouring interval is  0.0100 
Contour values are: 
-0.0500 -0.0400 -0.0300 -0.0200 -0.0100 0.0000 0.0100 0.0200 0.0300 0.0400 0.0500 
Maximum field value 0.0255 
Minimum field value -0.0312 
Shading is  off 
Reshaping for T30 Gaussian grid
Contouring from a minimum -0.0500 
Contouring to a maximum 0.0500 
Contouring interval is  0.0100 
Contour values are: 
-0.0500 -0.0400 -0.0300 -0.0200 -0.0100 0.0000 0.0100 0.0200 0.0300 0.0400 0.0500 
Maximum field value 0.0297 
Minimum field value -0.0599