| 16 |
% (and in the horizontal for that matter). |
% (and in the horizontal for that matter). |
| 17 |
if isequal(pst,'Grd') |
if isequal(pst,'Grd') |
| 18 |
if isCS |
if isCS |
| 19 |
merccube(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
merccube_mod(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 20 |
else |
else |
| 21 |
imagesc(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
imagesc(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 22 |
end |
end |
| 24 |
% Make interpolated plot. |
% Make interpolated plot. |
| 25 |
elseif isequal(pst,'Int') |
elseif isequal(pst,'Int') |
| 26 |
if isCS |
if isCS |
| 27 |
merccube(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
merccube_mod(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 28 |
shading interp; |
shading interp; |
| 29 |
else |
else |
| 30 |
pcolor(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
pcolor(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 34 |
% Make contour (non-filled) plot. Let MATLAB determine the contour |
% Make contour (non-filled) plot. Let MATLAB determine the contour |
| 35 |
% intervals on a differencing plot. |
% intervals on a differencing plot. |
| 36 |
elseif isequal(pst,'Con') |
elseif isequal(pst,'Con') |
| 37 |
if isequal(cmp,'Dif') |
try [cs,h] = contour(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
| 38 |
[cs,h] = contour(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
catch [cs,h] = contour(xax{inrow}{incol},yax{inrow}{incol},plotdata); end |
| 39 |
else |
set(h,'linewidth',linewidth); |
|
[cs,h]=contour(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
|
|
set(h,'linewidth',linewidth) |
|
|
end |
|
| 40 |
if UseConLabel |
if UseConLabel |
| 41 |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
| 42 |
end |
end |
| 44 |
% Make contour (filled) plot. Let MATLAB determine the contour |
% Make contour (filled) plot. Let MATLAB determine the contour |
| 45 |
% intervals on a differencing plot. |
% intervals on a differencing plot. |
| 46 |
elseif isequal(pst,'Cnf') |
elseif isequal(pst,'Cnf') |
| 47 |
if isequal(cmp,'Dif') |
try [cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
| 48 |
[cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
catch [cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata); end |
|
else |
|
|
[cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
|
|
end |
|
| 49 |
if UseCnfLabel |
if UseCnfLabel |
| 50 |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
| 51 |
end |
end |
| 54 |
% appropriate data of which to overlay. |
% appropriate data of which to overlay. |
| 55 |
elseif isequal(pst,'Lin') |
elseif isequal(pst,'Lin') |
| 56 |
if ismember(cmp,{'OvC','OvE','OvF'}) |
if ismember(cmp,{'OvC','OvE','OvF'}) |
| 57 |
for inexp = 1:nexp |
for intrl = 1:ntrl |
| 58 |
plot(xax{inrow}{inexp},data{inrow}{inexp},linecolors{inexp},'linewidth',linewidth); |
plot(xax{inrow}{intrl},data{inrow}{intrl},... |
| 59 |
|
linecolors{intrl},'linewidth',linewidth); |
| 60 |
end |
end |
| 61 |
else |
else |
| 62 |
plot(xax{inrow}{incol},plotdata,linecolors{1},'linewidth',linewidth); |
plot(xax{inrow}{incol},plotdata,linecolors{1},'linewidth',linewidth); |