show.m: add possibility to annotate image display

Author: dlegland

src/@Image/show.m

@@ -1,10 +1,28 @@
 function varargout = show(obj, varargin)
-% Shows image on current axis
+% Shows image on current axis.
 %
-% Image is displayed in its physical extent, based on image origin and
-% spacing. 
+% Image is displayed in its physical extent, based on image Origin and
+% Spacing properties.
 %
 
+%% parse input arguments
+
+% default values
+showTitle = true;
+showAxisNames = true;
+
+% parse options
+options = {};
+while length(varargin) > 1
+    if strcmp(varargin{1}, 'showAxisNames')
+    else
+        options = [options, varargin(1:2)]; %#ok<AGROW>
+    end
+    varargin(1:2) = [];
+end
+% options = varargin;
+
+
 % Check image dimension: should be 2, or can be squeezed to 2.
 if obj.Dimension ~= 2
     % compute number of image dimension
@@ -19,8 +37,7 @@
     end
 end
 
-options = varargin;
-
+%% Prepare data
 data = getDisplayData(obj);
 
 % if double, adjust grayscale extent
@@ -32,6 +49,9 @@
 xdata = xData(obj);
 ydata = yData(obj);
 
+
+%% Display data
+
 % display image with approriate spatial reference
 h = imshow(data, 'XData', xdata, 'YData', ydata, options{:});
 
@@ -44,11 +64,29 @@
 xlim(xl); ylim(yl);
 
 
+%% Annotate 
+
+% show title
+if ~isempty(obj.Name) && showTitle
+    title(obj.Name);
+end
+
+% show axis names
+if ~isempty(obj.AxisNames) && length(obj.AxisNames) >= 2 && showAxisNames
+    xlabel(obj.AxisNames{1})
+    ylabel(obj.AxisNames{2})
+end
+
+
+%% post-processing
+
 % eventually returns handle to image object
 if nargout > 0
     varargout = {h};
 end
 
+
+%% Inner functions
 function options = updateDisplayRangeOptions(data, options)
 
 % compute grayscale extent within image