data(learning.test)
res = gs(learning.test)
cpdag(res)
#
# Bayesian network learned via Constraint-based methods
#
# model:
# [partially directed graph]
# nodes: 6
# arcs: 5
# undirected arcs: 1
# directed arcs: 4
# average markov blanket size: 2.33
# average neighbourhood size: 1.67
# average branching factor: 0.67
#
# learning algorithm: Grow-Shrink
# conditional independence test: Mutual Information (discrete)
# alpha threshold: 0.05
# tests used in the learning procedure: 43
# optimized: TRUE
#
vstructs(res)
# X Z Y
# [1,] "A" "D" "C"
# [2,] "B" "E" "F"
Run the code above in your browser using DataLab