-
Notifications
You must be signed in to change notification settings - Fork 1
/
matpart.m
51 lines (49 loc) · 1.89 KB
/
matpart.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
% MIT License
%
% Copyright (c) 2017 Jose Bravo Ferreira
%
% Permission is hereby granted, free of charge, to any person obtaining a copy
% of this software and associated documentation files (the "Software"), to deal
% in the Software without restriction, including without limitation the rights
% to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
% copies of the Software, and to permit persons to whom the Software is
% furnished to do so, subject to the following conditions:
%
% The above copyright notice and this permission notice shall be included in all
% copies or substantial portions of the Software.
%
% THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
% IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
% FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
% AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
% LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
% OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
% SOFTWARE.
%% matpart.m
% partitions matrix along dimension <dim> according to the the lengths
% specificied in <vec>.
% E.g. given:
% A = [1 2 3 4 5; 6 7 8 9 10]
% dim = 2
% vec = [2 2 1]
% produces:
% part = cell(1,3)
% where:
% part{1} = [1 2; 6 7]
% part{2} = [3 4; 8 9]
% part{3} = [5; 10]
% NOTE: sum(vec) must be the same as size(A,dim)
function [part] = matpart(A,dim,vec)
assert((dim==1)||(dim==2),'Dimension must be 1 or 2');
assert(sum(vec)==size(A,dim),'Sum of block sizes must equal size of matrix');
count = 1;
for i=1:length(vec)
val = vec(i);
if dim==1
part{i} = A(count:count+val-1,:);
elseif dim==2
part{i} = A(:,count:count+val-1);
end
count = count+val;
end
end