comercio_datos <- load("C:/Users/moises/Downloads/Christian Moisés Murcia Zepeda - data_parcial_1_2021.RData")
#obtener importaciones y exportaciones
totales_pais_anios1 <- c(data_comercio_exterior)