r supprimer les lignes où la valeur est 0
data <- data[data$undesirable != 0,]
Muddy Macaque
data <- data[data$undesirable != 0,]