OLD_MATLAB_CODE not required anymore

[valse.git] / OLD_MATLAB / SelectModel / selectiondindice.m

diff --git a/OLD_MATLAB/SelectModel/selectiondindice.m b/OLD_MATLAB/SelectModel/selectiondindice.m
deleted file mode 100644 (file)
index 4ef8b96..0000000
--- a/OLD_MATLAB/SelectModel/selectiondindice.m
+++ /dev/null
@@ -1,19 +0,0 @@
-%utile dans selectiontotale.m, remarque quels coefficients sont nuls et lesquels ne le sont pas
-function[A,B]=selectiondindice(phi,seuil)
-
-       [pp,m,~]=size(phi);
-       A=zeros(pp,m);
-       B=zeros(pp,m);
-       for j=1:pp
-               cpt=0;cpt2=0;
-               for mm=1:m
-                       if (max(phi(j,mm,:)) > seuil)
-                               cpt=cpt+1;
-                               A(j,cpt)=mm;
-                       else cpt2=cpt2+1;
-                                B(j,cpt2)=mm;
-                       end
-               end
-       end
-
-end