# NOT RUN {
# }
# NOT RUN {
data(ITS)
model=AdaptGauss::AdaptGauss(ITS)
Classification=AdaptGauss::ClassifyByDecisionBoundaries(ITS,
DecisionBoundaries = AdaptGauss::BayesDecisionBoundaries(model$Means,model$SDs,model$Weights))
DataVisualizations::ClassBoxplot(ITS,Classification)$ggobject
# }
Run the code above in your browser using DataLab