# load bordeaux wines dataset
data(iris)
# geometric predictive discriminant analysis with no validation
my_geo1 = geoDA(iris[,1:4], iris$Species)
my_geo1$confusion
my_geo1$error_rate
# geometric predictive discriminant analysis with cross-validation
my_geo2 = geoDA(iris[,1:4], iris$Species, validation="crossval")
my_geo2$confusion
my_geo2$error_rateRun the code above in your browser using DataLab