probado prueba_funcion.R con todas las regiones y para algunas fechas