fix valse pkg functions callings in src/test/generate
[valse.git] / src / test / generate_test_data / helpers / constructionModelesLassoRank.R
index c319c61..183a6d1 100644 (file)
@@ -9,9 +9,9 @@ constructionModelesLassoRank = function(Pi,Rho,mini,maxi,X,Y,tau,A1,rangmin,rang
   deltaRank = rangmax - rangmin + 1
   Size = deltaRank^k
   Rank = matrix(0, Size, k)
-  for(r in 1:k){
-    Rank[,r] = rangmin + 
-  }
+#  for(r in 1:k) {
+#    Rank[,r] = rangmin +  <--- #FIXME:
+#  }
   
   phi = array(0, dim=c(p,m,k,L*Size))
   lvraisemblance = matrix(0, L*Size, 2)
@@ -31,4 +31,4 @@ constructionModelesLassoRank = function(Pi,Rho,mini,maxi,X,Y,tau,A1,rangmin,rang
     }
   }
   return(list(phi=phi, lvraisemblance = lvraisemblance))
-}
\ No newline at end of file
+}