X-Git-Url: https://git.auder.net/?a=blobdiff_plain;ds=sidebyside;f=reports%2FprintResults.R;h=a6cac0549b7c9208d1a99d1d75f50a6e67641cfa;hb=38c65767eb0c8c5a7ad6025471f56dbaffc68e6e;hp=2c3dbee45d86fe1ebab38721a8ea09bb6700875f;hpb=c181c2c3e6aedac53204f088a7f0702d03d4e513;p=morpheus.git

diff --git a/reports/printResults.R b/reports/printResults.R
index 2c3dbee..a6cac05 100644
--- a/reports/printResults.R
+++ b/reports/printResults.R
@@ -13,13 +13,12 @@ pprms <- function(link)
 {
   for (n in c("5000", "10000", "100000", "500000", "1000000"))
   {
-    method  =1
-    #for (method in 1:2)
-    #{
+    for (method in 1:2)
+    {
       toprint <- c()
       for (d in c(2,5,10))
       {
-        name <- paste0("res_", n, "_", d, "_", link, "_6,3,1.RData")
+        name <- paste0("res_", n, "_", d, "_", link, ".RData")
         params <- prms(name, method)
         toprint <- c(toprint, c(
           sum(abs(params[[1]] - params[[4]]$p)),
@@ -28,6 +27,6 @@ pprms <- function(link)
         ))
       }
       print(toprint, digits=2)
-    #}
+    }
   }
 }