Changed seed

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
       )
     )