X-Git-Url: https://git.auder.net/?p=morpheus.git;a=blobdiff_plain;f=reports%2FprintResults.R;h=28a21571b083103186129bfcd4323b852a22b7fc;hp=2c3dbee45d86fe1ebab38721a8ea09bb6700875f;hb=0038c0cfb61123a25fd44eeaee6122c73a65cc56;hpb=c181c2c3e6aedac53204f088a7f0702d03d4e513 diff --git a/reports/printResults.R b/reports/printResults.R index 2c3dbee..28a2157 100644 --- a/reports/printResults.R +++ b/reports/printResults.R @@ -19,7 +19,7 @@ pprms <- function(link) 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)),