# NOT RUN {
data(liver)
tree.init.p <- Initializer(dag=liver$dag, data=liver$data,
node.class=liver$node.class,
propagate = TRUE)
marg <- Marginals(tree.init.p, c("HDL", "Ppap2a", "Neu1"))
SummaryMarginals(marginals=marg)
# }
Run the code above in your browser using DataLab