Sample edge probabilities

Sample edge probabilities

Usage

SampleEdgeProbabilities(x)

Arguments

x

A chain(s) or collection object where states are DAGs.

Value

p_edge A posterior sample for the marginalised edge probabilities.

Examples

data <- bnlearn::learning.test

dag <- UniformlySampleDAG(colnames(data))
partitioned_nodes <- DAGtoPartition(dag)

scorer <- CreateScorer(
  scorer = BNLearnScorer, 
  data = data
  )

results <- SampleChains(10, partitioned_nodes, PartitionMCMC(), scorer)
dag_chains <- PartitiontoDAG(results, scorer)

pedge_sample <- SampleEdgeProbabilities(dag_chains)