# Crée des vecteurs
# y0 constitué de la suite des entiers de 0 à 10 par pas de 2
y0 <- seq(0, 10, by=2)
# y1 constitué de tous les entiers pairs entre 1 et 18
y1 <- seq(2, 18, by=2)
# y2 constitué de 20 fois de suite la valeur 4
y2 <- rep(4, 20)
# y3 constitué de 20 nombres entre 0 et 10
y3 <- runif(20, 0, 10)

# Extraire de y3
# le troisième élément
y33 <- y3[2]
# tous les éléments sauf le troisième
