vb_plot_marker

 plot markers on the face and view from left angle and right angle.
 [USAGE]
    h = vb_plot_marker(V, F, marker, marker2, name, name2);
 [IN]
         V : vertex
         F : face
    marker : marker position (Nx3)
   marker2 : marker position (Nx3)
      name : marker  namelist (Nx1 cell)
     name2 : marker2 namelist (Nx1 cell)
 [OUT]
    h : figure handle

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function    h = vb_plot_marker(V, F, marker, marker2, name, name2)
0002 % plot markers on the face and view from left angle and right angle.
0003 % [USAGE]
0004 %    h = vb_plot_marker(V, F, marker, marker2, name, name2);
0005 % [IN]
0006 %         V : vertex
0007 %         F : face
0008 %    marker : marker position (Nx3)
0009 %   marker2 : marker position (Nx3)
0010 %      name : marker  namelist (Nx1 cell)
0011 %     name2 : marker2 namelist (Nx1 cell)
0012 % [OUT]
0013 %    h : figure handle
0014 %
0015 % Copyright (C) 2011, ATR All Rights Reserved.
0016 % License : New BSD License(see VBMEG_LICENSE.txt)
0017 
0018 %
0019 % --- Previous check
0020 %
0021 if ~exist('marker2', 'var'), marker2 = []; end
0022 if ~exist('name', 'var'), name = []; end
0023 if ~exist('name2', 'var'), name2 = []; end
0024 
0025 %
0026 % --- Default setting
0027 %
0028 fwgcolor   = [0.8 0.7 0.6];
0029 edgecolor  = 'none';
0030 
0031 alphaval = 0.8;
0032 msize1     = 20;
0033 mtype1     = '.b';
0034 msize2     = 20;
0035 mtype2     = '.r';
0036 NX         = 2;
0037 NY         = 1;
0038 angleR     = [120 30];
0039 angleL     = [-120 30];
0040 fontsize = 10;
0041 
0042 %view([180, 0]);    % Front view (from +Y axis)
0043 %view([ 90, 0]);    % Right view (from +X axis)
0044 %view([-90, 0]);    % Left view  (from -X axis)
0045 %view([  0, 90]);    % Top view   (from +Z axis)
0046 
0047 h = figure;
0048 %
0049 % --- Left angle view
0050 %
0051 subplot(NY,NX,1)
0052 vb_plot_surf(V,F,fwgcolor,edgecolor,1);
0053 hold on
0054 view(angleL); 
0055 % plot marker and name
0056 plot3(marker(:,1),marker(:,2),marker(:,3),mtype1,'MarkerSize',msize1);
0057 for k=1:length(name)
0058     if ~vb_is_invalid_coordinate(marker(k, :))
0059         text(marker(k,1), marker(k,2), marker(k, 3),...
0060             name(k), 'FontSize', fontsize, 'FontWeight', 'bold', 'Color', 'k');
0061     end
0062 end
0063 % plot marker2 and name2
0064 if ~isempty(marker2)
0065     plot3(marker2(:,1),marker2(:,2),marker2(:,3),mtype2,'MarkerSize',msize2);
0066     for k=1:length(name2)
0067         if ~vb_is_invalid_coordinate(marker2(k, :))
0068             text(marker2(k,1), marker2(k,2), marker2(k, 3),...
0069                 name2(k), 'FontSize', fontsize, 'FontWeight', 'bold', 'Color', 'k');
0070         end
0071     end
0072 end
0073 
0074 alpha(alphaval);
0075 title('Sensor/Marker [Left]')
0076 axis equal;
0077 axis tight;
0078 
0079 %
0080 % --- Right angle view
0081 %
0082 subplot(NY,NX,2)
0083 vb_plot_surf(V,F,fwgcolor,edgecolor,1);
0084 hold on
0085 view(angleR); 
0086 % plot marker and name
0087 plot3(marker(:,1),marker(:,2),marker(:,3),mtype1,'MarkerSize',msize1);
0088 for k=1:length(name)
0089     if ~vb_is_invalid_coordinate(marker(k, :))
0090         text(marker(k,1), marker(k,2), marker(k, 3),...
0091             name(k), 'FontSize', fontsize, 'FontWeight', 'bold', 'Color', 'k');
0092     end
0093 end
0094 % plot marker2 and name2
0095 if ~isempty(marker2)
0096     plot3(marker2(:,1),marker2(:,2),marker2(:,3),mtype2,'MarkerSize',msize2);
0097     for k=1:length(name2)
0098         if ~vb_is_invalid_coordinate(marker2(k, :))
0099             text(marker2(k,1), marker2(k,2), marker2(k, 3),...
0100                 name2(k), 'FontSize', fontsize, 'FontWeight', 'bold', 'Color', 'k');
0101         end
0102     end
0103 end
0104 
0105 title('Sensor/Marker [Right]')
0106 axis equal;
0107 axis tight;
0108 alpha(alphaval);
0109 
0110 return