| 5 |
% Apply desired colorbar, contour label, tick labels, box, grid % |
% Apply desired colorbar, contour label, tick labels, box, grid % |
| 6 |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 7 |
|
|
| 8 |
|
% Center caxis around 0 |
| 9 |
|
if cmapcenter0 |
| 10 |
|
caxis([-max(abs(caxis)),max(abs(caxis))]); |
| 11 |
|
end |
| 12 |
|
|
| 13 |
|
% Apply desired colormap. |
| 14 |
|
if ~isequal(cmap,'') |
| 15 |
|
if isequal(cmap,'black') |
| 16 |
|
colormap([0,0,0]); |
| 17 |
|
elseif isequal(cmap,'bwr') |
| 18 |
|
load('BWR_6.mat'); |
| 19 |
|
colormap(bwr); |
| 20 |
|
else |
| 21 |
|
colormap(cmap); |
| 22 |
|
end |
| 23 |
|
end |
| 24 |
|
|
| 25 |
% Add colorbar, except for line plots. When the colorbar is placed, reset |
% Add colorbar, except for line plots. When the colorbar is placed, reset |
| 26 |
% the colorbar and axes positions on the figure to match desired settings. |
% the colorbar and axes positions on the figure to match desired settings. |
| 39 |
% y-axis label as is it now a dependent variable. |
% y-axis label as is it now a dependent variable. |
| 40 |
if UseNiceTickLabels |
if UseNiceTickLabels |
| 41 |
if isequal(pltslc{inrow}{incol}(1:3),'lon') |
if isequal(pltslc{inrow}{incol}(1:3),'lon') |
| 42 |
xtick = lontick; xticklabel = lonticklabel; |
xtick = fac.*lontick; xticklabel = lonticklabel; |
| 43 |
|
set(gca,'xtick',xtick); set(gca,'xticklabel',xticklabel); |
| 44 |
elseif isequal(pltslc{inrow}{incol}(1:3),'lat') |
elseif isequal(pltslc{inrow}{incol}(1:3),'lat') |
| 45 |
xtick = lattick; xticklabel = latticklabel; |
xtick = fac.*lattick; xticklabel = latticklabel; |
| 46 |
|
set(gca,'xtick',xtick); set(gca,'xticklabel',xticklabel); |
| 47 |
elseif isequal(pltslc{inrow}{incol}(1:3),'tim') |
elseif isequal(pltslc{inrow}{incol}(1:3),'tim') |
| 48 |
xtick = timtick; xticklabel = timticklabel; |
% xtick = timtick; xticklabel = timticklabel; |
| 49 |
a=1;%error('Fix me!!!') |
% set(gca,'xtick',xtick); set(gca,'xticklabel',xticklabel); |
| 50 |
end |
end |
| 51 |
set(gca,'xtick',xtick); |
|
|
set(gca,'xticklabel',xticklabel); |
|
| 52 |
if ~isequal(pltslc{inrow}{incol}(4:6),'fld') |
if ~isequal(pltslc{inrow}{incol}(4:6),'fld') |
| 53 |
if isequal(pltslc{inrow}{incol}(4:6),'lat') |
if isequal(pltslc{inrow}{incol}(4:6),'lat') |
| 54 |
ytick = lattick; yticklabel = latticklabel; |
ytick = fac.*lattick; yticklabel = latticklabel; |
| 55 |
elseif isequal(pltslc{inrow}{incol}(4:6),'hgt') |
elseif isequal(pltslc{inrow}{incol}(4:6),'hgt') |
| 56 |
eval(['ytick = vertick',flu,';']); |
eval(['ytick = vertick',flu,';']); |
| 57 |
eval(['yticklabel = verticklabel',flu,';']); |
eval(['yticklabel = verticklabel',flu,';']); |
| 79 |
end |
end |
| 80 |
eval(['legend(',legendstr,num2str(LegendPlacement),')']); |
eval(['legend(',legendstr,num2str(LegendPlacement),')']); |
| 81 |
end |
end |
| 82 |
|
|
| 83 |
|
% Add coast as appropriate. |
| 84 |
|
if Coast |
| 85 |
|
%m_proj('Mercator','lat',90,'lon',[-180,177.5]); |
| 86 |
|
m_proj('Equidistant Cylindrical','lat',90,'lon',[-180 180]); |
| 87 |
|
m_coast('color',[0 0 0]); |
| 88 |
|
%m_grid('box','on') |
| 89 |
|
%draw_coast(1.) |
| 90 |
|
end |