1 Tema: Cantidad de despachos aduaneros bajo el rubro de logística, Comercio Exterior y Gestión Aduanera durante el año 2024

2 Objetivo: Analizar la cantidad de despachos aduaneros registrados en Paraguay durante el año 2024

3 Gestión de Datos con R

3.1 Descarga de la fuente

https://www.dnit.gov.py/web/portal-institucional/datos-abiertos

3.2 Carga de librerias necesarias

library(data.table)

## 
## Adjuntando el paquete: 'data.table'

## The following object is masked from 'package:base':
## 
##     %notin%

library(dplyr)

## 
## Adjuntando el paquete: 'dplyr'

## The following objects are masked from 'package:data.table':
## 
##     between, first, last

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

library(ggplot2)
library(lubridate)

## 
## Adjuntando el paquete: 'lubridate'

## The following objects are masked from 'package:data.table':
## 
##     hour, isoweek, isoyear, mday, minute, month, quarter, second, wday,
##     week, yday, year

## The following objects are masked from 'package:base':
## 
##     date, intersect, setdiff, union

library(tidyr)

3.3 Carga de las bases en formato .csv usando la libreria data.table de R que estan en la ruta C:llamados 2024_ENERO.csv, 2024_FEBRERO.csv,2024_MARZO.csv, 2024_ABRIL.csv, 2024_MAYO.csv, 2024_JUNIO.csv, 2024_JULIO.csv, 2024_AGOSTO.csv, 2024_SEPTIEMBRE.csv, 2024_OCTUBRE.csv, 2024_NOVIEMBRE.csv, 2024_DICIEMBRE.csv

# Cargar los datos de cada mes

enero <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_ENERO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
febrero <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_FEBRERO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
marzo <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_MARZO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
abril <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_ABRIL.csv", sep = ",", header = TRUE, encoding = "UTF-8")
mayo <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_MAYO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
junio <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_JUNIO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
julio <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_JULIO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
agosto <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_AGOSTO.csv", sep = ",", header = TRUE, encoding = "UTF-8")
septiembre <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_SEPTIEMBRE.csv", sep = ",", header = TRUE, encoding = "UTF-8")
octubre <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_OCTUBRE.csv", sep = ",", header = TRUE, encoding = "UTF-8")
noviembre <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_NOVIEMBRE.csv", sep = ",", header = TRUE, encoding = "UTF-8")
diciembre <- fread("C:/Users/GCA/Desktop/AduanasPy/2024_DICIEMBRE.csv", sep = ",", header = TRUE, encoding = "UTF-8")

3.4 Unir los datos de todos los meses en un solo data frame

# Unir los datos de todos los meses en un solo data frame
datos=rbind(enero, febrero, marzo, abril, mayo, junio, julio, agosto, septiembre, octubre, noviembre, diciembre)
nrow(datos)

## [1] 4473218

3.5 Guardar la base compilada en formato csv

#Guardar la base compilada en fromato csv

# write.csv(datos,"C:/Users/GCA/Desktop/AduanasPy/2024_TODOS.csv", row.names = FALSE, fileEncoding = "UTF-8")

3.6 Alternativa guardando en formato .rds

# Guardar la base compilada en formato rds
system.time({
saveRDS(datos, "C:/Users/GCA/Desktop/AduanasPy/2024_TODOS.rds")
})

##    user  system elapsed 
##  112.87    0.84  120.97

3.7 Cargar la base en formato .rds

# cargar el formato rds

system.time({
  datos <- readRDS("C:/Users/GCA/Desktop/AduanasPy/2024_TODOS.rds")
  })

##    user  system elapsed 
##   53.96    3.33   64.34

3.8 La estadística que demuestra la hipótesis

3.8.1 Filtrar

glimpse(datos)

## Rows: 4,473,218
## Columns: 47
## $ `DESPACHO CIFRADO`          <chr> "24DA000000007030", "24DA000000007030", "2…
## $ OPERACION                   <chr> "IMPORTACION", "IMPORTACION", "IMPORTACION…
## $ DESTINACION                 <chr> "IC04", "IC04", "IC04", "IC04", "IC04", "I…
## $ REGIMEN                     <chr> "IMPORTACION A CONSUMO CON DOCUMENTO DE TR…
## $ OFICIALIZACION              <chr> "26/01/2024", "26/01/2024", "26/01/2024", …
## $ CANCELACION                 <chr> "29/01/2024", "29/01/2024", "29/01/2024", …
## $ AÑO                         <int> 2024, 2024, 2024, 2024, 2024, 2024, 2024, …
## $ MES                         <chr> "ENERO", "ENERO", "ENERO", "ENERO", "ENERO…
## $ ADUANA                      <chr> "PTO SEGURO FLUVIAL", "PTO SEGURO FLUVIAL"…
## $ COTIZACION                  <chr> "7293,29", "7293,29", "7293,29", "7293,29"…
## $ `MEDIO TRANSPORTE`          <chr> "ACUATICO", "ACUATICO", "ACUATICO", "ACUAT…
## $ CANAL                       <chr> "R", "R", "R", "R", "R", "R", "R", "R", "R…
## $ ITEM                        <int> 2, 2, 3, 3, 4, 4, 5, 5, 5, 5, 5, 6, 6, 6, …
## $ `PAIS ORIGEN`               <chr> "COREA DEL SUR", "COREA DEL SUR", "COREA D…
## $ `PAIS PROCEDENCIA/DESTINO`  <chr> "COREA DEL SUR", "COREA DEL SUR", "COREA D…
## $ USO                         <chr> "NUEVO", "NUEVO", "NUEVO", "NUEVO", "NUEVO…
## $ `UNIDAD MEDIDA ESTADISTICA` <chr> "UNIDAD", "UNIDAD", "UNIDAD", "UNIDAD", "U…
## $ `CANTIDAD ESTADISTICA`      <chr> "1500,0", "1500,0", "36,0", "36,0", "2000,…
## $ `KILO NETO`                 <chr> "318,53", "318,53", "120,0", "120,0", "667…
## $ `KILO BRUTO`                <chr> "318,53", "318,53", "120,0", "120,0", "667…
## $ `FOB DOLAR`                 <chr> "4650,0", "4650,0", "860,76", "860,76", "1…
## $ `FLETE DOLAR`               <chr> "146,45", "146,45", "27,11", "27,11", "314…
## $ `SEGURO DOLAR`              <chr> "15,1", "15,1", "2,8", "2,8", "32,48", "32…
## $ `IMPONIBLE DOLAR`           <chr> "4811,55", "4811,55", "890,67", "890,67", …
## $ `IMPONIBLE GS`              <chr> "35092029,5", "35092029,5", "6495914,6", "…
## $ `AJUSTE A INCLUIR`          <chr> ",0", ",0", ",0", ",0", ",0", ",0", ",0", …
## $ `AJUSTE A DEDUCIR`          <chr> ",0", ",0", ",0", ",0", ",0", ",0", ",0", …
## $ `POSICION `                 <chr> "8512.90.00.000M", "8512.90.00.000M", "842…
## $ RUBRO                       <chr> "REPUESTOS (AUTOPARTE)", "REPUESTOS (AUTOP…
## $ `DESC CAPITULO`             <chr> "CAPITULO 85  MAQUINAS, APARATOS Y MATERIA…
## $ `DESC PARTIDA`              <chr> "APARATOS ELECTRICOS DE ALUMBRADO O SE¿ALI…
## $ `DESC POSICION`             <chr> "CAPITULO 85  MAQUINAS, APARATOS Y MATERIA…
## $ MERCADERIA                  <chr> "CEPILLOS LIMPIAPARABRISAS, DETALLADOS EN …
## $ `MARCA ITEM`                <chr> "", "", "", "", "", "", "", "", "", "", ""…
## $ ACUERDO                     <chr> "SIN ACUERDO", "SIN ACUERDO", "SIN ACUERDO…
## $ `NUMERO SUBITEM`            <int> 4, 5, 1, 2, 1, 2, 1, 2, 3, 4, 5, 1, 2, 3, …
## $ `CANTIDAD SUBITEM`          <int> 300, 300, 24, 12, 1000, 1000, 100, 300, 30…
## $ `PRECION UNITARIO SUBITEM`  <chr> "3,1", "3,1", "24,78", "22,17", "4,8", "5,…
## $ `DESC SUBITEM`              <chr> "UNID. CEPILLOS LIMPIAPARABRISAS 550 MM", …
## $ `MARCA SUBITEM`             <chr> "CLEANSHOT", "CLEANSHOT", "IFILTER", "IFIL…
## $ DERECHO                     <chr> "3509203,0", "3509203,0", "324796,0", "324…
## $ ISC                         <chr> "387767,0", "387767,0", ",0", ",0", ",0", …
## $ SERVICIO                    <chr> "175460,0", "175460,0", "32480,0", "32480,…
## $ RENTA                       <chr> ",0", ",0", ",0", ",0", ",0", ",0", ",0", …
## $ IVA                         <chr> "3916446,0", "3916446,0", "685319,0", "685…
## $ OTROS                       <chr> "156658,0", "156658,0", "27413,0", "27413,…
## $ TOTAL                       <chr> "8145534,0", "8145534,0", "1070008,0", "10…

summary(datos)

##   DESPACHO CIFRADO       OPERACION          DESTINACION     
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique : 614684   N.unique :      2   N.unique :     67  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0  
##  Min.nchar:     16   Min.nchar:     11   Min.nchar:      4  
##  Max.nchar:     16   Max.nchar:     11   Max.nchar:      4  
##                                                             
##                                                             
##       REGIMEN          OFICIALIZACION       CANCELACION           AÑO      
##  Length   :4473218   Length   :4473218   Length   :4473218   Min.   :2024  
##  N.unique :     66   N.unique :   1469   N.unique :    365   1st Qu.:2024  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0   Median :2024  
##  Min.nchar:     19   Min.nchar:     10   Min.nchar:     10   Mean   :2024  
##  Max.nchar:     55   Max.nchar:     10   Max.nchar:     10   3rd Qu.:2024  
##                                                              Max.   :2024  
##                                                                            
##         MES                ADUANA            COTIZACION     
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique :     12   N.unique :     33   N.unique :   1329  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0  
##  Min.nchar:      4   Min.nchar:      5   Min.nchar:      6  
##  Max.nchar:     10   Max.nchar:     20   Max.nchar:      7  
##                                                             
##                                                             
##   MEDIO TRANSPORTE         CANAL              ITEM            PAIS ORIGEN     
##  Length   :4473218   Length   :4473218   Min.   :   1.00   Length   :4473218  
##  N.unique :      5   N.unique :      3   1st Qu.:   1.00   N.unique :    190  
##  N.blank  : 464031   N.blank  :      0   Median :   4.00   N.blank  :      7  
##  Min.nchar:      0   Min.nchar:      1   Mean   :  17.43   Min.nchar:      0  
##  Max.nchar:     14   Max.nchar:      1   3rd Qu.:  16.00   Max.nchar:     35  
##                                          Max.   :2213.00                      
##                                                                               
##  PAIS PROCEDENCIA/DESTINO        USO          UNIDAD MEDIDA ESTADISTICA
##  Length   :4473218        Length   :4473218   Length   :4473218        
##  N.unique :    179        N.unique :      2   N.unique :     11        
##  N.blank  :     11        N.blank  :      0   N.blank  :      2        
##  Min.nchar:      0        Min.nchar:      5   Min.nchar:      0        
##  Max.nchar:     38        Max.nchar:      5   Max.nchar:     14        
##                                                                        
##                                                                        
##  CANTIDAD ESTADISTICA     KILO NETO           KILO BRUTO     
##  Length   :4473218    Length   :4473218   Length   :4473218  
##  N.unique : 124263    N.unique : 199327   N.unique : 224676  
##  N.blank  :      0    N.blank  :      0   N.blank  :      0  
##  Min.nchar:      2    Min.nchar:      2   Min.nchar:      2  
##  Max.nchar:     13    Max.nchar:     11   Max.nchar:     11  
##                                                              
##                                                              
##      FOB DOLAR          FLETE DOLAR         SEGURO DOLAR    
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique : 566726   N.unique : 215162   N.unique :  69818  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0  
##  Min.nchar:      2   Min.nchar:      2   Min.nchar:      2  
##  Max.nchar:     11   Max.nchar:     11   Max.nchar:     11  
##                                                             
##                                                             
##   IMPONIBLE DOLAR       IMPONIBLE GS      AJUSTE A INCLUIR  
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique : 825556   N.unique :1739444   N.unique :  27655  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0  
##  Min.nchar:      2   Min.nchar:      2   Min.nchar:      2  
##  Max.nchar:     12   Max.nchar:     16   Max.nchar:     10  
##                                                             
##                                                             
##   AJUSTE A DEDUCIR       POSICION              RUBRO        
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique :  17723   N.unique :   7294   N.unique :     94  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0  
##  Min.nchar:      2   Min.nchar:     15   Min.nchar:      2  
##  Max.nchar:     10   Max.nchar:     15   Max.nchar:    203  
##                                                             
##                                                             
##    DESC CAPITULO        DESC PARTIDA       DESC POSICION    
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique :     96   N.unique :   1704   N.unique :   7271  
##  N.blank  :      0   N.blank  : 202315   N.blank  :      0  
##  Min.nchar:     17   Min.nchar:      1   Min.nchar:     48  
##  Max.nchar:    306   Max.nchar:    996   Max.nchar:   1601  
##                                                             
##                                                             
##      MERCADERIA          MARCA ITEM           ACUERDO        NUMERO SUBITEM   
##  Length   :4473218   Length   :4473218   Length   :4473218   Min.   :   0.00  
##  N.unique : 899413   N.unique :  57203   N.unique :     18   1st Qu.:   0.00  
##  N.blank  :     10   N.blank  :2698906   N.blank  :     89   Median :   2.00  
##  Min.nchar:      0   Min.nchar:      0   Min.nchar:      0   Mean   :  21.64  
##  Max.nchar:    208   Max.nchar:     40   Max.nchar:     16   3rd Qu.:  10.00  
##                                                              Max.   :1550.00  
##                                                              NAs    :5042     
##  CANTIDAD SUBITEM   PRECION UNITARIO SUBITEM    DESC SUBITEM    
##  Min.   :       0   Length   :4473218        Length   :4473218  
##  1st Qu.:       0   N.unique :  75968        N.unique :1748968  
##  Median :       2   N.blank  :      0        N.blank  :1782074  
##  Mean   :    1109   Min.nchar:      2        Min.nchar:      0  
##  3rd Qu.:      40   Max.nchar:      9        Max.nchar:    256  
##  Max.   :21024000                                               
##                                                                 
##    MARCA SUBITEM          DERECHO               ISC         
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique :  36198   N.unique : 481895   N.unique :  84096  
##  N.blank  :1790954   N.blank  :      0   N.blank  :      0  
##  Min.nchar:      0   Min.nchar:      2   Min.nchar:      2  
##  Max.nchar:     40   Max.nchar:     12   Max.nchar:     12  
##                                                             
##                                                             
##       SERVICIO             RENTA                IVA         
##  Length   :4473218   Length   :4473218   Length   :4473218  
##  N.unique : 405790   N.unique :  36435   N.unique : 840560  
##  N.blank  :      0   N.blank  :      0   N.blank  :      0  
##  Min.nchar:      2   Min.nchar:      2   Min.nchar:      2  
##  Max.nchar:     11   Max.nchar:     11   Max.nchar:     12  
##                                                             
##                                                             
##        OTROS               TOTAL        
##  Length   :4473218   Length   :4473218  
##  N.unique : 385876   N.unique : 944445  
##  N.blank  :      0   N.blank  :      0  
##  Min.nchar:      2   Min.nchar:      2  
##  Max.nchar:     11   Max.nchar:     13  
##                                         
##

4 Revisar si existen datos faltantes

colSums(is.na(datos))

##          DESPACHO CIFRADO                 OPERACION               DESTINACION 
##                         0                         0                         0 
##                   REGIMEN            OFICIALIZACION               CANCELACION 
##                         0                         0                         0 
##                       AÑO                       MES                    ADUANA 
##                         0                         0                         0 
##                COTIZACION          MEDIO TRANSPORTE                     CANAL 
##                         0                         0                         0 
##                      ITEM               PAIS ORIGEN  PAIS PROCEDENCIA/DESTINO 
##                         0                         0                         0 
##                       USO UNIDAD MEDIDA ESTADISTICA      CANTIDAD ESTADISTICA 
##                         0                         0                         0 
##                 KILO NETO                KILO BRUTO                 FOB DOLAR 
##                         0                         0                         0 
##               FLETE DOLAR              SEGURO DOLAR           IMPONIBLE DOLAR 
##                         0                         0                         0 
##              IMPONIBLE GS          AJUSTE A INCLUIR          AJUSTE A DEDUCIR 
##                         0                         0                         0 
##                 POSICION                      RUBRO             DESC CAPITULO 
##                         0                         0                         0 
##              DESC PARTIDA             DESC POSICION                MERCADERIA 
##                         0                         0                         0 
##                MARCA ITEM                   ACUERDO            NUMERO SUBITEM 
##                         0                         0                      5042 
##          CANTIDAD SUBITEM  PRECION UNITARIO SUBITEM              DESC SUBITEM 
##                         0                         0                         0 
##             MARCA SUBITEM                   DERECHO                       ISC 
##                         0                         0                         0 
##                  SERVICIO                     RENTA                       IVA 
##                         0                         0                         0 
##                     OTROS                     TOTAL 
##                         0                         0

5 Obtener la cantidad de despachos por mes

despachos_mes <- datos %>%
  group_by(MES) %>%
  summarise(total_despachos = n())

5.1 Visualizar

despachos_mes

6 Graficar los despachos mensuales

library(ggplot2)
library(scales)

6.1 Ordenar los meses en orden calendario (no alfabético)

orden_meses <- c("ENERO","FEBRERO","MARZO","ABRIL","MAYO","JUNIO",
                  "JULIO","AGOSTO","SEPTIEMBRE","OCTUBRE","NOVIEMBRE","DICIEMBRE")

despachos_mes$MES <- factor(despachos_mes$MES, levels = orden_meses)

6.1.1 Gráfico

ggplot(despachos_mes,
       aes(x = MES, y = total_despachos)) +
  geom_col(fill = "#2E74B5", width = 0.7) +
  geom_text(aes(label = comma(total_despachos)),
            vjust = -0.5, size = 3.2, color = "#1F3864") +
  scale_y_continuous(labels = comma, expand = expansion(mult = c(0, 0.15))) +
  labs(
    title = "Cantidad de Despachos Aduaneros por Mes - 2024",
    subtitle = "Dirección Nacional de Ingresos Tributarios (DNIT)",
    x = NULL,
    y = "Cantidad de Despachos"
  ) +
  theme_minimal(base_size = 13) +
  theme(
    axis.text.x = element_text(angle = 45, hjust = 1),
    plot.title = element_text(face = "bold", color = "#1F3864"),
    plot.subtitle = element_text(color = "grey40"),
    panel.grid.minor = element_blank(),
    panel.grid.major.x = element_blank()
  )

7 Promedio de enero a noviembre

promedio_otros <- despachos_mes %>%
  filter(MES != "DICIEMBRE") %>%
  summarise(promedio = mean(total_despachos))

7.1 Visualizar

promedio_otros

8 Valor de Diciembre

diciembre <- despachos_mes %>%
  filter(MES == "DICIEMBRE")

8.1 Visualizar

diciembre

library(knitr)
kable(despachos_mes,
      caption = "Cantidad de despachos aduaneros por mes durante el año 2024")

Cantidad de despachos aduaneros por mes durante el año 2024
MES	total_despachos
ABRIL	356670
AGOSTO	394538
DICIEMBRE	463500
ENERO	322543
FEBRERO	330608
JULIO	407718
JUNIO	320299
MARZO	303178
MAYO	360200
NOVIEMBRE	405246
OCTUBRE	437252
SEPTIEMBRE	371466

9 Comparar diciembre con el promedio

diciembre$total_despachos

## [1] 463500

promedio_otros$promedio

## [1] 364519.8

diferencia <- diciembre$total_despachos -
              promedio_otros$promedio

diferencia

## [1] 98980.18

9.1 Gráfico comparativo

comparacion <- data.frame(
  Grupo = c("Promedio Ene-Nov",
            "Diciembre"),
  Valor = c(promedio_otros$promedio,
            diciembre$total_despachos)
)

ggplot(comparacion,
       aes(x = Grupo,
           y = Valor)) +
  geom_col() +
  labs(
    title = "Comparación de Diciembre vs Promedio de los demás meses",
    x = "",
    y = "Cantidad de Despachos"
  )

#Procentaje de viariación de diciembre respecto al promedio de los demás meses

diciembre_valor <- despachos_mes %>%
  filter(MES == "DICIEMBRE") %>%
  pull(total_despachos)

promedio_otros_valor <- despachos_mes %>%
  filter(MES != "DICIEMBRE") %>%
  summarise(promedio = mean(total_despachos)) %>%
  pull(promedio)

diferencia <- diciembre_valor - promedio_otros_valor
porcentaje_variacion <- (diferencia / promedio_otros_valor) * 100

cat("Diciembre presentó una variación del",
    round(porcentaje_variacion, 2),
    "% respecto al promedio de enero a noviembre.\n")

## Diciembre presentó una variación del 27.15 % respecto al promedio de enero a noviembre.

10 Estadística descriptiva completa (todos los meses, incluyendo diciembre)

estadisticas <- despachos_mes %>%
  summarise(
    promedio_general = mean(total_despachos),
    desvio_estandar   = sd(total_despachos),
    minimo            = min(total_despachos),
    maximo            = max(total_despachos),
    coef_variacion    = (sd(total_despachos) / mean(total_despachos)) * 100
  )
estadisticas

11 Vector con los despachos de enero a noviembre (excluyendo diciembre)

otros_meses <- despachos_mes %>%
  filter(MES != "DICIEMBRE") %>%
  pull(total_despachos)

12 Prueba t de una muestra: ¿el valor de diciembre es distinto de la media de los otros meses?

prueba_t <- t.test(otros_meses, mu = diciembre$total_despachos)
prueba_t

## 
##  One Sample t-test
## 
## data:  otros_meses
## t = -7.6376, df = 10, p-value = 1.763e-05
## alternative hypothesis: true mean is not equal to 463500
## 95 percent confidence interval:
##  335644.0 393395.6
## sample estimates:
## mean of x 
##  364519.8

13 Intervalo de confianza del 95% para el promedio de enero-noviembre

prueba_t$conf.int

## [1] 335644.0 393395.6
## attr(,"conf.level")
## [1] 0.95

Análisis de los Despachos Aduaneros en Paraguay - Año 2024

Claudia Benítez

2026-06-10

1 Tema: Cantidad de despachos aduaneros bajo el rubro de logística, Comercio Exterior y Gestión Aduanera durante el año 2024

2 Objetivo: Analizar la cantidad de despachos aduaneros registrados en Paraguay durante el año 2024

3 Gestión de Datos con R

3.1 Descarga de la fuente

3.2 Carga de librerias necesarias

3.4 Unir los datos de todos los meses en un solo data frame

3.5 Guardar la base compilada en formato csv

3.6 Alternativa guardando en formato .rds

3.7 Cargar la base en formato .rds

3.8 La estadística que demuestra la hipótesis

3.8.1 Filtrar

4 Revisar si existen datos faltantes

5 Obtener la cantidad de despachos por mes

5.1 Visualizar

6 Graficar los despachos mensuales

6.1 Ordenar los meses en orden calendario (no alfabético)

6.1.1 Gráfico

7 Promedio de enero a noviembre

7.1 Visualizar

8 Valor de Diciembre

8.1 Visualizar

9 Comparar diciembre con el promedio

9.1 Gráfico comparativo

10 Estadística descriptiva completa (todos los meses, incluyendo diciembre)

11 Vector con los despachos de enero a noviembre (excluyendo diciembre)

12 Prueba t de una muestra: ¿el valor de diciembre es distinto de la media de los otros meses?

13 Intervalo de confianza del 95% para el promedio de enero-noviembre