load("/Users/raphaellemomal/Desktop/SOTR/Graphe in R/Hp.RData")
Harry <- Livres %>%  filter(Personnage == "Harry")
head(Harry)

## # A tibble: 6 x 5
##   Num_chap Livre               Chap Personnage Nb_rep
##      <int> <fct>              <int> <chr>       <int>
## 1        1 philosophers_stone     1 Harry          20
## 2        2 philosophers_stone     2 Harry          79
## 3        3 philosophers_stone     3 Harry          68
## 4        4 philosophers_stone     4 Harry          48
## 5        5 philosophers_stone     5 Harry         147
## 6        6 philosophers_stone     6 Harry         117

Dans les aes on met les variables !

p <- ggplot(data = Harry, aes(x = Num_chap, y = Nb_rep )) 
p

On peut ajouter sur notre graphe vide des "geom" qui sont des surcouches :

p +  geom_point()

On peut ajouter sur notre graphe vide des "geom" qui sont des surcouches :

p +  geom_point() + geom_line()

On peut ajouter sur notre graphe vide des "geom" qui sont des surcouches :

p +  geom_point() + geom_line() + geom_smooth(method ="lm") + geom_bar(stat = "identity")