powered by
layering(x) "layering"(x)
BN
## Not run: # dataset <- BNDataset("file.header", "file.data") # x <- BN(dataset) # x <- learn.network(x, dataset) # layering(x) # ## End(Not run)
Run the code above in your browser using DataLab