View source: R/summary.bcdag.R
summary.bcdag | R Documentation |
This method produces summaries of the input and output of the function learn_DAG()
.
## S3 method for class 'bcdag'
summary(object, ...)
object |
a |
... |
additional arguments affecting the summary produced |
A printed message listing the inputs given to learn_DAG and the estimated posterior probabilities of edge inclusion.
n <- 1000
q <- 4
DAG <- matrix(c(0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0), nrow = q)
L <- DAG
L[L != 0] <- runif(q, 0.2, 1)
diag(L) <- c(1,1,1,1)
D <- diag(1, q)
Sigma <- t(solve(L))%*%D%*%solve(L)
a <- 6
g <- 1/1000
U <- g*diag(1,q)
w = 0.2
set.seed(1)
X <- mvtnorm::rmvnorm(n, sigma = Sigma)
out <- learn_DAG(1000, 0, X, a, U, w, fast = TRUE, collapse = TRUE, save.memory = FALSE)
summary(out)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.