# NOT RUN {
feat <- mmb::createFeatureForBayes(
name = "Petal.Length", value = mean(iris$Petal.Length))
mmb::bayesComputeMarginalFactor(df = iris, feature = feat)
mmb::bayesComputeMarginalFactor(df = iris, feature = feat, doEcdf = TRUE)
# }
Run the code above in your browser using DataLab