[r] Eliminating NAs from a ggplot