Enlever vide
function B=enlever_vide(A)
%Purger les cases vides des cell arrays, A doit avoir 2 lignes
k=1;
for i=1:length(A)
if ~isempty(A{1,i})
B{1,k}=A{1,i};
B{2,k}=A{2,i};
k=k+1;
end % end if
end % end for
function B=enlever_vide(A)
%Purger les cases vides des cell arrays, A doit avoir 2 lignes
k=1;
for i=1:length(A)
if ~isempty(A{1,i})
B{1,k}=A{1,i};
B{2,k}=A{2,i};
k=k+1;
end % end if
end % end for