## Not run:
# ## first create a BN and learn its structure from a dataset
# dataset <- BNDataset("file.header", "file.data")
# bn <- BN(dataset)
# bn <- learn.structure(bn, dataset)
# bn <- learn.params(bn, dataset, ess=1)
# ## End(Not run)
Run the code above in your browser using DataLab