Mercurial > octave-nkf

comparison scripts/plot/private/__errplot__.m @ 10594:4b421123fd17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
__errplot__.m: Fix bug parsing errorbar style.
author Ben Abbott <bpabbott@mac.com>
date Fri, 30 Apr 2010 18:28:21 -0400
parents f0a7a72c1fbf
children d1978e7364ad
comparison
equal deleted inserted replaced
10593:26d51c6e1c4c 10594:4b421123fd17
74 74
75 switch (numel(varargin)) 75 switch (numel(varargin))
76 case 2 76 case 2
77 ydata = varargin{1}(:,i); 77 ydata = varargin{1}(:,i);
78 xdata = 1:numel(ydata); 78 xdata = 1:numel(ydata);
79 if (strcmp (ifmt, "xerr") || index (ifmt, "box")) 79 if (strcmp (ifmt, "xerr") || strcmp (ifmt, "box"))
80 xldata = varargin{2}(:,i); 80 xldata = varargin{2}(:,i);
81 xudata = ldata; 81 xudata = ldata;
82 ldata = []; 82 ldata = [];
83 udata = []; 83 udata = [];
84 elseif (strcmp (ifmt, "yerr") || index (ifmt, "boxy")) 84 elseif (strcmp (ifmt, "yerr") || strcmp (ifmt, "boxy"))
85 ldata = varargin{2}(:,i); 85 ldata = varargin{2}(:,i);
86 udata = ldata; 86 udata = ldata;
87 xldata = []; 87 xldata = [];
88 xudata = []; 88 xudata = [];
89 else 89 else
90 error ("2 column errorplot is only valid or xerr or yerr"); 90 error ("2 column errorplot is only valid or xerr or yerr");
91 endif 91 endif
92 case 3 92 case 3
93 if (strcmp (ifmt, "boxxy") || index (ifmt, "xyerr")) 93 if (strcmp (ifmt, "boxxy") || strcmp (ifmt, "xyerr"))
94 ydata = varargin{1}(:,i); 94 ydata = varargin{1}(:,i);
95 xdata = 1:numel(ydata); 95 xdata = 1:numel(ydata);
96 xldata = varargin{2}(:,i); 96 xldata = varargin{2}(:,i);
97 xudata = xldata; 97 xudata = xldata;
98 ldata = varargin{3}(:,i); 98 ldata = varargin{3}(:,i);
99 udata = ldata; 99 udata = ldata;
100 elseif (strcmp (ifmt, "xerr") || index (ifmt, "box")) 100 elseif (strcmp (ifmt, "xerr") || strcmp (ifmt, "box"))
101 xdata = varargin{1}(:,i); 101 xdata = varargin{1}(:,i);
102 ydata = varargin{2}(:,i); 102 ydata = varargin{2}(:,i);
103 xldata = varargin{3}(:,i); 103 xldata = varargin{3}(:,i);
104 xudata = xldata; 104 xudata = xldata;
105 ldata = []; 105 ldata = [];
111 udata = ldata; 111 udata = ldata;
112 xldata = []; 112 xldata = [];
113 xudata = []; 113 xudata = [];
114 endif 114 endif
115 case 4 115 case 4
116 if (strcmp (ifmt, "boxxy") || index (ifmt, "xyerr")) 116 if (strcmp (ifmt, "boxxy") || strcmp (ifmt, "xyerr"))
117 xdata = varargin{1}(:,i); 117 xdata = varargin{1}(:,i);
118 ydata = varargin{2}(:,i); 118 ydata = varargin{2}(:,i);
119 xldata = varargin{3}(:,i); 119 xldata = varargin{3}(:,i);
120 xudata = xldata; 120 xudata = xldata;
121 ldata = varargin{4}(:,i); 121 ldata = varargin{4}(:,i);
134 udata = varargin{4}(:,i); 134 udata = varargin{4}(:,i);
135 xldata = []; 135 xldata = [];
136 xudata = []; 136 xudata = [];
137 endif 137 endif
138 case 6 # boxxy, xyerr 138 case 6 # boxxy, xyerr
139 if (strcmp (ifmt, "boxxy") || index (ifmt, "xyerr")) 139 if (strcmp (ifmt, "boxxy") || strcmp (ifmt, "xyerr"))
140 xdata = varargin{1}(:,i); 140 xdata = varargin{1}(:,i);
141 ydata = varargin{2}(:,i); 141 ydata = varargin{2}(:,i);
142 xldata = varargin{3}(:,i); 142 xldata = varargin{3}(:,i);
143 xudata = varargin{4}(:,i); 143 xudata = varargin{4}(:,i);
144 ldata = varargin{5}(:,i); 144 ldata = varargin{5}(:,i);