bayesian_network.R first commit