Merge pull request #1 from ziejd2/octave_php_separate

Octave php separate

1 files changed, 22 insertions, 0 deletions

diff --git a/sourcecodes/bnt-master/KPMtools/cell2matPad.m b/sourcecodes/bnt-master/KPMtools/cell2matPad.m
new file mode 100644
index 00000000..5b9e94a1
--- /dev/null
+++ b/sourcecodes/bnt-master/KPMtools/cell2matPad.m
@@ -0,0 +1,22 @@
+function data2 = cell2matPad(data)
+% data{f}(y,x,b) - each frame can have a different size (can can even be empty)
+% data2(y,x,b,f) = zero padded version
+
+Nframes = length(data);
+Nbands = -inf;
+nr = -inf; nc = -inf;
+for f=1:Nframes
+  if isempty(data{f}), continue; end
+  nr = max(nr, size(data{f},1));
+  nc = max(nc, size(data{f},2));
+  Nbands = max(Nbands, size(data{f},3));
+end    
+data2 = zeros(nr, nc, Nbands, Nframes);
+for f=1:Nframes
+  if isempty(data{f}), continue; end
+  data2(1:size(data{f},1), 1:size(data{f},2), :, f) = data{f};
+end
+if Nbands == 1
+  data2 = squeeze(data2); % reshape(data2, [size(data2,1), size(data2,2), Nframes]);
+end
+