diff --git a/donnees.R b/donnees.R
index 325feba..b20cd6b 100644
--- a/donnees.R
+++ b/donnees.R
@@ -134,7 +134,7 @@ src_mysql("pmsi_dim", "localhost", user = user, password = password) %>%
             collect(n = Inf), by = "uf") %>%
   anti_join(rum, by="idhosp") %>% # supprimer séjours codés
   arrange(idhosp, date_sortie) %>%
-  filter(!(service %in% c("5110", "5140", "1700", "1170", "1600", "2350")),
+  filter(!(service %in% c("5110", "5140", "1700", "1170", "1600", "2350", "9090")),
          !is.na(service)) %>%
   group_by(idhosp) %>%
   summarise(date_entree = first(date_entree),