function [Y,W]=separa_JADE(X,n) % X contiene los espectrogramas de las n mezclas de voz. Y contendra los % espectrogramas obtenidos mediante la separacion usando el algoritmo JADE, % y W(:,:,f) seran las matrices de separacion para cada frecuencia for f=1:length(X(:,1,1)) for k=1:n Vin(k,:)=X(f,:,k); end [W(:,:,f),Vout]=jade(Vin,n); W(:,:,f)=pinv(W(:,:,f)); for k=1:n Y(f,:,k)=Vout(k,:); end end