diff --git a/R/globals.R b/R/globals.R
index cb6988c..be66932 100644
--- a/R/globals.R
+++ b/R/globals.R
@@ -22,4 +22,4 @@ utils::globalVariables(c("replica","is_conflict","observed",
                          "data_combine", "digits", "is_conflict_dis_rep",
                          "edad_jep", "edad_jep_imputed", "muni_code_hecho",
                          "proportions_observed", "etnia_imputed", "etnia2",
-                         "quinquenio", "periodo_pres"))
+                         "quinquenio", "periodo_pres", "in_24"))
diff --git a/R/sysdata.rda b/R/sysdata.rda
index 0bfdf90..2b34c28 100644
Binary files a/R/sysdata.rda and b/R/sysdata.rda differ
diff --git a/R/utils_authentication.R b/R/utils_authentication.R
index f8c59cc..32e71c6 100644
--- a/R/utils_authentication.R
+++ b/R/utils_authentication.R
@@ -132,9 +132,19 @@ medidas <- function(replicate_path) {
                                                "2007" = "farc en 2007")) %>%
         dplyr::select(variable, valor)
 
+    N_rows <- replicate_data %>%
+        dplyr::summarise(valor = dplyr::n()) %>%
+        dplyr::mutate(variable = "N rows") %>%
+        dplyr::select(variable, valor)
+
+    N_in_24 <- replicate_data %>%
+        dplyr::summarise(valor = sum(in_24)) %>%
+        dplyr::mutate(variable = "N in_24") %>%
+        dplyr::select(variable, valor)
+
     comparar <- dplyr::bind_rows(dpto, etnia, edad, year_2002_2007, year_1990_1994,
                                  sexo, perp, w_minor, caq_89_93, may, paras_bog,
-                                 paras_2016, mestizo_2000, farc_2007)
+                                 paras_2016, mestizo_2000, farc_2007, N_rows, N_in_24)
 
     replicate <- rep(replicate, each = nrow(comparar)) %>%
         as.data.frame()