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

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

init_state <- InitPartition(colnames(data), scorer)
results <- SampleChains(10, init_state, PartitionMCMC(), scorer)
dag_chains <- PartitiontoDAG(results, scorer)

pedge_sample <- SampleEdgeProbabilities(dag_chains)