Running examples in 'pcalg-Ex.R' failed
The error most likely occurred in:

> ### Name: GaussParDAG-class
> ### Title: Class '"GaussParDAG"' of Gaussian Causal Models
> ### Aliases: GaussParDAG-class
> ### Keywords: classes models
> 
> ### ** Examples
> 
> set.seed(307)
> myDAG <- r.gauss.pardag(p = 5, prob = 0.4)
> (wm <- myDAG$weight.mat())
  1 2 3 4         5
1 0 0 0 0 0.0000000
2 0 0 0 0 0.6076338
3 0 0 0 0 0.0000000
4 0 0 0 0 0.0000000
5 0 0 0 0 0.0000000
> m <- as(myDAG, "matrix") # TRUE/FALSE adjacency matrix
> symnum(m)
              
[1,] . . . . .
[2,] . . . . |
[3,] . . . . .
[4,] . . . . .
[5,] . . . . .
> stopifnot(identical(unname( m ),
+                     unname(wm != 0)))
> myDAG$err.var()
        1         2         3         4         5 
0.8591428 0.7681129 0.6537283 0.5346632 0.5170106 
> myDAG$intercept()
1 2 3 4 5 
0 0 0 0 0 
> myDAG$set.intercept(runif(5, min=3, max=4))
> myDAG$intercept()
       1        2        3        4        5 
3.413215 3.715030 3.420457 3.905033 3.480052 
> if (require(Rgraphviz)) plot(myDAG)
Loading required package: Rgraphviz
Loading required package: graph
Loading required package: BiocGenerics
Loading required package: parallel

Attaching package: 'BiocGenerics'

The following objects are masked from 'package:parallel':

    clusterApply, clusterApplyLB, clusterCall, clusterEvalQ,
    clusterExport, clusterMap, parApply, parCapply, parLapply,
    parLapplyLB, parRapply, parSapply, parSapplyLB

The following objects are masked from 'package:stats':

    IQR, mad, sd, var, xtabs

The following objects are masked from 'package:base':

    Filter, Find, Map, Position, Reduce, anyDuplicated, append,
    as.data.frame, basename, cbind, colnames, dirname, do.call,
    duplicated, eval, evalq, get, grep, grepl, intersect, is.unsorted,
    lapply, mapply, match, mget, order, paste, pmax, pmax.int, pmin,
    pmin.int, rank, rbind, rownames, sapply, setdiff, sort, table,
    tapply, union, unique, unsplit, which, which.max, which.min

Loading required package: grid
Warning: multiple methods tables found for 'plot'
Error in as.double(x) : 
  cannot coerce type 'S4' to vector of type 'double'
Calls: plot -> plot -> plot -> plot -> plot.default -> xy.coords
Execution halted