Cours classification

03_Classification/.~lock.cours.odp#

@@ -0,0 +1 @@
+,maxx,maxx-hegp.localdomain,03.04.2018 17:06,file:///home/maxx/.config/libreoffice/4;

03_Classification/figures.R

@@ -0,0 +1,21 @@
+library(tidyverse)
+
+# Classification
+
+data(iris)
+
+(
+iris %>%
+  ggplot() +
+  aes(x = Petal.Width, y = Sepal.Width, color = Species) +
+  geom_point()
+) %>%
+ggsave(plot = ., filename = "classif.png")
+
+
+library(rpart)
+
+rpart(Species ~ ., data = iris) %T>%
+  plot(branch = .5, margin = .5) %>%
+  text(use.n = T, all = T, pretty = T, fancy = T)
+