Fixed bug with geom_interval() when ymin/ymax were provided as cells

@gramm/geom_interval.m

@@ -36,7 +36,7 @@
 
 if iscell(draw_data.x)
     for k=1:length(draw_data.x)
-        plotci(obj,draw_data.x{k},draw_data.y{k},[draw_data.ymin{k} draw_data.ymax{k}],draw_data,params.geom,params.dodge,params.width);
+        hndl = plotci(obj,draw_data.x{k},draw_data.y{k},[draw_data.ymin{k} draw_data.ymax{k}],draw_data,params.geom,params.dodge,params.width);
     end
 else
     hndl=plotci(obj,draw_data.x,draw_data.y,[draw_data.ymin draw_data.ymax],draw_data,params.geom,params.dodge,params.width);

@gramm/private/validate_aes.m

@@ -42,10 +42,18 @@
     if ~all(equal_lengths)
         error('Cells in X and Y have different lengths');
     end
-    if iscell(out.z)
-        equal_lengths=cellfun(@(y,z)length(y)==length(z),out.y,out.z);
-        if ~all(equal_lengths)
-            error('Cells in Z and X/Y have different lengths');
+
+    %Process facultative data that can be in cells
+    to_process = {'z' , 'ymin', 'ymax'};
+    for k = 1:length(to_process)
+        if iscell(out.(to_process{k}))
+            % Check lengths
+            equal_lengths=cellfun(@(y,z)length(y)==length(z),out.y,out.(to_process{k}));
+            if ~all(equal_lengths)
+                error(['Cells in ' to_process{k} ' and X/Y have different lengths']);
+            end
+            % Shiftdim cell contents
+            out.(to_process{k})=cellfun(@(c)shiftdim(c),out.(to_process{k}),'uniformOutput',false);
         end
     end
 end