diff --git a/controle_ptz.R b/controle_ptz.R
index 65cfdfa60d74bba1d67c1fbba65ce00a578b3696..50574f67842ec5db969d10ee1f0a4089eac05cef 100644
--- a/controle_ptz.R
+++ b/controle_ptz.R
@@ -73,4 +73,5 @@ base_erreur_region <- base_intermediaire3 %>%
   filter(cins_egal_cpfl == "1") %>%
   select(-cins_egal_cpfl,decompte)
 
+rm(base_intermediaire,base_intermediaire2,base_intermediaire3,nb_lignes_tot, nb_lignes_erreur)