From 7a4f770904bdcdb4886a30f1e7a9ba1cadf48dd3 Mon Sep 17 00:00:00 2001 From: Waldir Leoncio Date: Mon, 19 Feb 2024 16:52:49 +0100 Subject: [PATCH] Changed seed --- .../testthat/test-pinferunemjmcmc-example-match-1.4.3.R | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/tests/testthat/test-pinferunemjmcmc-example-match-1.4.3.R b/tests/testthat/test-pinferunemjmcmc-example-match-1.4.3.R index 795f58e..c1874c5 100644 --- a/tests/testthat/test-pinferunemjmcmc-example-match-1.4.3.R +++ b/tests/testthat/test-pinferunemjmcmc-example-match-1.4.3.R @@ -14,7 +14,7 @@ thf <- 0.05 # final treshold on the posterior marginal prob for reporting a tree # specify tuning parameters of the algorithm for exploring DBRM of interest # notice that allow_offsprings=3 corresponds to the GMJMCMC runs and # allow_offsprings=4 -to the RGMJMCMC runs -set.seed(9239838) +set.seed(923938) res1 <- suppressMessages( pinferunemjmcmc( n.cores = M, report.level = 0.5, num.mod.best = NM, simplify = TRUE, @@ -31,12 +31,9 @@ res1 <- suppressMessages( ), n.models = 1000, unique = TRUE, max.cpu = 4, max.cpu.glob = 4, create.table = FALSE, create.hash = TRUE, pseudo.paral = TRUE, - burn.in = 10, print.freq = 1000, + burn.in = 10, print.freq = 0L, advanced.param = list( - max.N.glob = as.integer(10), - min.N.glob = as.integer(5), - max.N = as.integer(3), - min.N = as.integer(1), + max.N.glob = 10L, min.N.glob = 5L, max.N = 3L, min.N = 1L, printable = FALSE ) )