Running ‘test_LINGAM.R’ [4s/5s]
  Running ‘test_addBgKnowledge.R’ [3s/4s]
  Running ‘test_adjustment.R’ [6s/8s]
  Running ‘test_ages.R’ [3s/4s]
  Running ‘test_amat2dag.R’ [2s/3s]
  Running ‘test_arges.R’ [2s/3s]
  Running ‘test_backdoor.R’ [11s/12s]
  Comparing ‘test_backdoor.Rout’ to ‘test_backdoor.Rout.save’ ... OK
  Running ‘test_bicscore.R’ [3s/4s]
  Running ‘test_causalEffect.R’ [2s/3s]
  Running ‘test_coercion.R’ [3s/4s]
  Running ‘test_compareGraphs.R’ [2s/3s]
  Running ‘test_dag2cpdag.R’ [3s/4s]
  Running ‘test_dag2essgraph.R’ [3s/3s]
  Running ‘test_displayAmat.R’ [3s/3s]
  Running ‘test_dsep.R’ [3s/3s]
  Running ‘test_dsepAM.R’ [3s/3s]
  Running ‘test_dsepAMTest.R’ [3s/4s]
  Running ‘test_fci.R’ [2s/3s]
  Running ‘test_fciPlus.R’ [3s/4s]
  Running ‘test_gSquareBin.R’ [2s/2s]
  Running ‘test_gSquareDis.R’ [4s/5s]
  Running ‘test_gac.R’ [5s/6s]
  Running ‘test_getNextSet.R’ [2s/3s]
  Running ‘test_gies.R’ [5s/6s]
  Running ‘test_ida.R’ [17s/20s]
  Running ‘test_idaFast.R’ [8s/9s]
  Running ‘test_isValidGraph.R’ [6s/7s]
  Running ‘test_jointIda.R’ [3s/4s]
  Running ‘test_mat2targets.R’ [3s/4s]
  Running ‘test_optAdjSet.R’ [3s/4s]
  Running ‘test_opttarget.R’ [2s/3s]
  Running ‘test_pag2anc.R’ [2s/3s]
  Running ‘test_pag2conf.R’ [2s/3s]
  Running ‘test_pag2edge.R’ [2s/3s]
  Running ‘test_pc.R’ [4s/5s]
  Running ‘test_pcSelect.R’ [4s/5s]
  Running ‘test_pcalg2dagitty.R’ [3s/5s]
  Running ‘test_pcorOrder.R’ [2s/2s]
  Running ‘test_pdag2allDags.R’ [2s/3s]
  Running ‘test_pdag2dag.R’ [2s/3s]
  Running ‘test_possDeAn.R’ [3s/3s]
  Running ‘test_randDAG.R’ [3s/3s]
  Running ‘test_randomDAG.R’ [2s/3s]
  Running ‘test_rfci.R’ [5s/6s]
  Running ‘test_rmvDAG.R’ [3s/3s]
  Running ‘test_searchAM.R’ [2s/3s]
  Running ‘test_shd.R’ [2s/3s]
  Running ‘test_skeleton.R’ [5s/7s]
  Running ‘test_udag2pag.R’ [2s/3s]
  Running ‘test_udag2pdag.R’ [8s/10s]
  Running ‘test_wgtMatrix.R’ [2s/3s]
Running the tests in ‘tests/test_randDAG.R’ failed.
Complete output:
  > library(pcalg)
  > suppressWarnings(RNGversion("3.5.0"))
  > ## setwd("/sfs/u/kalischm/research/packages/unifDAGs/")
  > ## source("aux_general.R")
  > ## source("randDAG.R")
  > 
  > ### Check all methods: ----------------------------------------------
  > 
  > ## MM hack: extract them from the randDAG() function definition
  > body. <- body(randDAG)
  > is.switch <- function(P) !is.symbol(P) && identical(as.symbol("switch"), P[[1]])
  > switchCall <- body.[vapply(body., is.switch, NA)][[1]]
  > stopifnot(identical(as.symbol("switch"), switchCall[[1]]))
  > (rDAGmeths <- names(switchCall)[-c(1:2, length(switchCall))])
  [1] "er"        "regular"   "watts"     "bipartite" "barabasi"  "geometric"
  [7] "power"     "interEr"  
  > rDAGall <- function(n, d, ...)
  +     sapply(rDAGmeths, function(meth) randDAG(n,d, method=meth, ...),
  +            simplify=FALSE)
  > set.seed(37)
  > rD.10.4 <- withCallingHandlers(
  +     rDAGall(10, 4) # "low-level warning" -- get it here and test it below
  +     , warning = function(w) {
  +         rDAG.warn <<- conditionMessage(w); invokeRestart("muffleWarning") })
  > ## with a low-level warning:
  > ## IGNORE_RDIFF_BEGIN
  > rDAG.warn
  Error: object 'rDAG.warn' not found
  Execution halted