r Zeilen entfernen, wo der Wert 0 ist

data <- data[data$undesirable != 0,]
Muddy Macaque