Mercurial > octave

comparison scripts/general/accumdim.m @ 11191:01ddaedd6ad5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Reverse changeset b1f4bdc276b6. Use all lower case for "uniformoutput" option.
author Rik <octave@nomad.inbox5.com>
date Thu, 04 Nov 2010 12:18:08 -0700
parents b1f4bdc276b6
children c776f063fefe
comparison
equal deleted inserted replaced
11190:b1f4bdc276b6 11191:01ddaedd6ad5
114 subsc = {':'}(ones (1, length (sz))); 114 subsc = {':'}(ones (1, length (sz)));
115 subsc{dim} = idx; 115 subsc{dim} = idx;
116 val = mat2cell (val(subsc{:}), szc{:}); 116 val = mat2cell (val(subsc{:}), szc{:});
117 ## Apply reductions. Special case min, max. 117 ## Apply reductions. Special case min, max.
118 if (func == @min || func == @max) 118 if (func == @min || func == @max)
119 val = cellfun (func, val, {[]}, {dim}, "UniformOutput", false); 119 val = cellfun (func, val, {[]}, {dim}, "uniformoutput", false);
120 else 120 else
121 val = cellfun (func, val, {dim}, "UniformOutput", false); 121 val = cellfun (func, val, {dim}, "uniformoutput", false);
122 endif 122 endif
123 subs = subs(jdx); 123 subs = subs(jdx);
124 124
125 ## Concatenate reduced slices. 125 ## Concatenate reduced slices.
126 val = cat (dim, val{:}); 126 val = cat (dim, val{:});