## Not run:
# network <- load_amidst_bn(system.file("extdata","WasteIncinerator.bn",
# package="ramidst"))
# sample_stream <- amidst_data_stream(system.file("extdata",
# "WasteIncineratorSample.arff",package="ramidst"))
# map_configurations <- map_inference_from_stream(network,c("D","B"),c("W"),
# sample_stream,5L)
# map_configurations
# ## End(Not run)
Run the code above in your browser using DataLab