Mercurial > hg > dcase2013_ed_vuegenetal

diff functions/fe_funcs/stacklp.m @ 0:2fadb31a9d55 tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import code by Vuegen et al
author Dan Stowell <dan.stowell@elec.qmul.ac.uk>
date Fri, 11 Oct 2013 12:02:43 +0100
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/functions/fe_funcs/stacklp.m	Fri Oct 11 12:02:43 2013 +0100
@@ -0,0 +1,14 @@
+function y=stacklp(x,N)
+
+if nargin<2,
+  N=5;
+end
+
+[D,T]=size(x);
+xext=x(:,[ones(1,N) 1:T T*ones(1,N)]);
+
+y=zeros((2*N+1)*D,T);
+if islogical(x), y=logical(y);end % copy logical property
+for k=0:2*N,
+  y(k*D+(1:D),:)=xext(:,k+1:k+T);
+end
\ No newline at end of file