powered by
rbn(x, n, data, debug = FALSE)
bn
TRUE
data
data(learning.test) res = gs(learning.test) res = set.arc(res, "A", "B") par(mfrow = c(1,2)) plot(res) sim = rbn(res, 500, learning.test) plot(gs(sim))
Run the code above in your browser using DataLab