X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2Fmain.R;h=c74d7fbeb8fd32406365acfbd2f47e6a1388225a;hb=bb64f5cbaa3f0d4cc49a0325ca24d4f41f90ccc3;hp=d750fec8f1e0e9b56f578908653424519b6d878c;hpb=1196a43d961a95abc18d3c8e777e9a4e8233e562;p=valse.git

diff --git a/pkg/R/main.R b/pkg/R/main.R
index d750fec..c74d7fb 100644
--- a/pkg/R/main.R
+++ b/pkg/R/main.R
@@ -148,7 +148,7 @@ runValse <- function(X, Y, procedure = "LassoMLE", selecMod = "DDSE", gamma = 1,
   modelSel$tableau <- tableauRecap
 
   if (plot)
-    print(plot_valse(X, Y, modelSel, n))
+    print(plot_valse(X, Y, modelSel))
 
   return(modelSel)
 }