Solucion P1 puntuacion adicional.

CLAVE 1

PARTE 1

1- Calcule las exportaciones totales de El Salvador hacia la región de África Sub-Sahariana, para el periodo 2019-2020, (en millones de US$)

library(dplyr)
library(kableExtra)
data_comercio_exterior_actualizada %>%
  select("anio","valor_fob","sub_region") %>%
  filter(sub_region=="Africa Sub-Sahariana",anio %in% 2019:2020,valor_fob>0) %>% group_by(anio) %>%
  summarise(`Total Exportaciones El Salvador hacia  África Sub-sahariana MM US$`=sum(valor_fob)/1e6) %>% 
  head() %>% kable(caption = "Exportaciones totales de El Salvador en millones de US$ hacia la region de África Sub-Sahariana") %>% 
  kable_minimal()  %>%  kable_styling(bootstrap_options = "striped",
                full_width = TRUE)%>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Exportaciones totales de El Salvador en millones de US$ hacia la region de África Sub-Sahariana

anio	Total Exportaciones El Salvador hacia África Sub-sahariana MM US$
2019	2.452792
2020	2.269393
* Elaboración propia con base en datos del BCR

2- Obtenga el Saldo de la balanza comercial de El Salvador, con “Asia Sudoriental”, para el periodo 2017-2019, (en millones de US$)

library(dplyr)
library(kableExtra)
data_comercio_exterior_actualizada %>%
  filter(sub_region=="Asia Sudoriental",anio %in% c(2017:2019)) %>%
  group_by(anio) %>%
  summarise(`Total Exportaciones MM US$`=sum(valor_fob)/1e6,
            `Total Importaciones MM US$`=sum(valor_cif)/1e6,
            `Balanza Comercial ESA-Asia Sudoriental MM $`=`Total Exportaciones MM US$`-`Total Importaciones MM US$`) %>% 
  head() %>% kable(caption = "Saldo de la Balanza comercial ESA-ASUD") %>% kable_minimal()  %>%  
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Saldo de la Balanza comercial ESA-ASUD

anio	Total Exportaciones MM US$	Total Importaciones MM US$	Balanza Comercial ESA-Asia Sudoriental MM $
2017	73.591111	269.4838	-195.8927
2018	16.609646	280.8837	-264.2740
2019	4.608928	262.5498	-257.9409
* Elaboración propia con base en datos del BCR

3- Por cada dólar exportado a la región Sudamericana, en el año 2019, ¿Cuánto se importo?

library(dplyr)
library(kableExtra)
Exportaciones<-data_comercio_exterior_actualizada %>% filter(valor_cif==0, valor_fob>0, anio==2019,region_intermedia=="Sudamerica") %>% 
  summarise(`Total de exportaciones de El Salvador a Sudamérica`=sum(valor_fob))

Importaciones<-data_comercio_exterior_actualizada %>%
filter(region_intermedia=="Sudamerica", valor_cif>0, valor_fob==0, anio==2019) %>% 
  summarise(`Proporcion de Importaciones/Exportaciones de El Salvador a Sudamerica`=sum(valor_cif))

Expor_Impor_total<- (Importaciones/Exportaciones)
Expor_Impor_total

##   Proporcion de Importaciones/Exportaciones de El Salvador a Sudamerica
## 1                                                              19.13248

4- Calcule el indicador de Balassa de El Salvador, con México, Estados Unidos y Canadá, durante el periodo 2017-2020, para el capitulo “01” del SAC.

library(dplyr)
library(kableExtra)
capitulo<-"01"
data.frame("anios"=2017:2020,
           "IB_Mexico"=sapply(X=2017:2020,FUN = indicadores_Balassa_capitulo,codigo_pais=484,capitulo=capitulo),
           "IB_USA"=sapply(X=2017:2020,FUN = indicadores_Balassa_capitulo,codigo_pais=840,capitulo=capitulo),
           "IB_Canada"=sapply(X=2017:2020,FUN = indicadores_Balassa_capitulo,codigo_pais=124,capitulo=capitulo))%>%
  kable(caption = "Indicador de Balassa de El Salvador con: México, Estados Unidos y Canadá, durante el periodo 2017-2020",
        digits = 4,align = "l")%>%
  kable_styling(bootstrap_options = "striped",
                full_width = TRUE)%>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Indicador de Balassa de El Salvador con: México, Estados Unidos y Canadá, durante el periodo 2017-2020

anios	IB_Mexico	IB_USA	IB_Canada
2017	-0.5767	0.3591	0.3947
2018	-0.8247	0.3222	0.6139
2019	-0.8983	0.4009	0.1877
2020	-0.9765	0.7046	0.1791
* Elaboración propia con base en datos del BCR

CLAVE 2

PARTE 1

1- Calcule el indicador de IVCR de El Salvador, con México, Estados Unidos y Canadá, durante el periodo 2017-2020, para el capitulo “01” del SAC.

library(dplyr)
library(kableExtra)
capitulo<-"01"
data.frame("anios"=2017:2020,
           "IVCR_Mexico"=sapply(X=2017:2020,FUN = indicadores_IVCR_capitulo,codigo_pais=484,capitulo=capitulo),
           "IVCR_USA"=sapply(X=2017:2020,FUN = indicadores_IVCR_capitulo,codigo_pais=840,capitulo=capitulo),
           "IVCR_Canada"=sapply(X=2017:2020,FUN = indicadores_IVCR_capitulo,codigo_pais=124,capitulo=capitulo))%>%
  kable(caption = "Indicador de IVCR de El Salvador con: México, Estados Unidos y Canadá, durante el periodo 2017-2020")%>%
  kable_styling(bootstrap_options = "striped",
                full_width = TRUE)%>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Indicador de IVCR de El Salvador con: México, Estados Unidos y Canadá, durante el periodo 2017-2020

anios	IVCR_Mexico	IVCR_USA	IVCR_Canada
2017	-0.0006366	-0.1268112	0.0025811
2018	-0.0047801	-0.0997253	0.0000473
2019	-0.0014925	-0.0880920	0.0003483
2020	-0.0013917	-0.0769218	0.0004293
* Elaboración propia con base en datos del BCR

2- Por cada dólar exportado a la región Centroamericana , en el periodo 2017-2019, ¿Cuánto se importo? (resultado por año)

# Ejecutamos para el año 2017
Exportaciones_2017<-data_comercio_exterior_actualizada %>% filter(valor_cif==0, valor_fob>0, anio==2017,region_intermedia=="Centroamérica") %>% 
  summarise(`Total de exportaciones de ESA a Centroamérica`=sum(valor_fob))

Importaciones_2017<-data_comercio_exterior_actualizada %>%
filter(region_intermedia=="Centroamérica", valor_cif>0, valor_fob==0, anio==2017) %>% 
  summarise(`Total de importaciones de ESA a Centroamérica`=sum(valor_cif))

Expor_Impor_total_2017<- (Importaciones_2017/Exportaciones_2017)
Expor_Impor_total_2017  %>% 
  head() %>% kable(caption = "Proporcion Importaciones/Exportaciones de ESA-CA durante 2017") %>% kable_minimal() %>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_styling()

Proporcion Importaciones/Exportaciones de ESA-CA durante 2017

Total de importaciones de ESA a Centroamérica
1.580565
* Elaboración propia con base en datos del BCR

# Ejecutamos para el año 2018
Exportaciones_2018<-data_comercio_exterior_actualizada %>% filter(valor_cif==0, valor_fob>0, anio==2018,region_intermedia=="Centroamérica") %>% 
  summarise(`Total de exportaciones de ESA a Centroamérica`=sum(valor_fob))

Importaciones_2018<-data_comercio_exterior_actualizada %>%
filter(region_intermedia=="Centroamérica", valor_cif>0, valor_fob==0, anio==2018) %>% 
  summarise(`Total de importaciones de ESA a Centroamérica`=sum(valor_cif))

Expor_Impor_total_2018<- (Importaciones_2018/Exportaciones_2018)
Expor_Impor_total_2018  %>% 
  head() %>% kable(caption = "Proporcion Importaciones/Exportaciones de ESA-CA durante 2018") %>% kable_minimal() %>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_styling()

Proporcion Importaciones/Exportaciones de ESA-CA durante 2018

Total de importaciones de ESA a Centroamérica
1.743028
* Elaboración propia con base en datos del BCR

# Ejecutamos para el año 2019
Exportaciones_2019<-data_comercio_exterior_actualizada %>% filter(valor_cif==0, valor_fob>0, anio==2019,region_intermedia=="Centroamérica") %>% 
  summarise(`Total de exportaciones de ESA a Centroamérica`=sum(valor_fob))

Importaciones_2019<-data_comercio_exterior_actualizada %>%
filter(region_intermedia=="Centroamérica", valor_cif>0, valor_fob==0, anio==2019) %>% 
  summarise(`Total de importaciones de ESA a Centroamérica`=sum(valor_cif))

Expor_Impor_total_2019<- (Importaciones_2019/Exportaciones_2019)
Expor_Impor_total_2019  %>% 
  head() %>% kable(caption = "Proporcion Importaciones/Exportaciones de ESA-CA durante 2019") %>% kable_minimal() %>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_styling()

Proporcion Importaciones/Exportaciones de ESA-CA durante 2019

Total de importaciones de ESA a Centroamérica
1.729294
* Elaboración propia con base en datos del BCR

3- Obtenga el Saldo de la balanza comercial de El Salvador, con el “Caribe”, para el periodo 2017-2019, (en millones de US$)

data_comercio_exterior_actualizada %>%
  filter(region_intermedia=="Caribe",anio %in% c(2017:2019)) %>%
   group_by(anio) %>%
  summarise(`Total Exportaciones MM US$`=sum(valor_fob)/1e6,
            `Total Importaciones MM US$`=sum(valor_cif)/1e6,
            `Balanza Comercial El Salvador-El Caribe MM $`=`Total Exportaciones MM US$`-`Total Importaciones MM US$`) %>% 
  head() %>% kable(caption = "Saldo de la Balanza comercial El Salvador-El Caribe") %>% kable_minimal()  %>%  
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Saldo de la Balanza comercial El Salvador-El Caribe

anio	Total Exportaciones MM US$	Total Importaciones MM US$	Balanza Comercial El Salvador-El Caribe MM $
2017	150.1824	46.04799	104.1345
2018	172.1331	34.04536	138.0877
2019	169.1371	21.61247	147.5247
* Elaboración propia con base en datos del BCR

4- Calcule las exportaciones totales de El Salvador hacia la región Norte De Europa, para el periodo 2019-2020 son (en millones de US$)

data_comercio_exterior_actualizada %>%
  select("anio","valor_fob","sub_region") %>%
    filter(sub_region=="Norte De Europa",anio %in% 2019:2020,valor_fob>0) %>%
      group_by(anio) %>%
        summarise(`Total Exportaciones ESA MM US$`=sum(valor_fob)/1e6) %>% 
        head() %>% kable(caption = "Exportaciones totales de El Salvador en millones de US$ hacia la región de Norte de Europa") %>% kable_minimal()  %>% 
        add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Exportaciones totales de El Salvador en millones de US$ hacia la región de Norte de Europa

anio	Total Exportaciones ESA MM US$
2019	19.80854
2020	11.75937
* Elaboración propia con base en datos del BCR

CLAVE 3

PARTE 1

1- Por cada dólar exportado a la región Suramericana, en el periodo 2018-2019, ¿Cuánto se importo? (resultado por año).

# Ejecutamos para el año 2018
Exportaciones_2018_1<-data_comercio_exterior_actualizada %>% filter(valor_cif==0, valor_fob>0, anio==2018,region_intermedia=="Sudamerica") %>% 
  summarise(`Total de exportaciones de ESA a Sudamerica`=sum(valor_fob))

Importaciones_2018_1<-data_comercio_exterior_actualizada %>%
filter(region_intermedia=="Sudamerica", valor_cif>0, valor_fob==0, anio==2018) %>% 
  summarise(`Total de importaciones de ESA a Sudamerica`=sum(valor_cif))

Expor_Impor_total_2018_1<- (Importaciones_2018_1/Exportaciones_2018_1)
Expor_Impor_total_2018_1  %>% 
  head() %>% kable(caption = "Proporcion Importaciones/Exportaciones de ESA-Sudamerica durante 2018") %>% kable_minimal() %>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_styling()

Proporcion Importaciones/Exportaciones de ESA-Sudamerica durante 2018

Total de importaciones de ESA a Sudamerica
16.76119
* Elaboración propia con base en datos del BCR

# Ejecutamos para el año 2019
Exportaciones_2019_1<-data_comercio_exterior_actualizada %>% filter(valor_cif==0, valor_fob>0, anio==2019,region_intermedia=="Sudamerica") %>% 
  summarise(`Total de exportaciones de ESA a Sudamerica`=sum(valor_fob))

Importaciones_2019_1<-data_comercio_exterior_actualizada %>%
filter(region_intermedia=="Sudamerica", valor_cif>0, valor_fob==0, anio==2019) %>% 
  summarise(`Total de importaciones de ESA a Sudamerica`=sum(valor_cif))

Expor_Impor_total_2019_1<- (Importaciones_2019_1/Exportaciones_2019_1)
Expor_Impor_total_2019_1  %>% 
  head() %>% kable(caption = "Proporcion Importaciones/Exportaciones de ESA-Sudamerica durante 2019") %>% kable_minimal() %>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_styling()

Proporcion Importaciones/Exportaciones de ESA-Sudamerica durante 2019

Total de importaciones de ESA a Sudamerica
19.13248
* Elaboración propia con base en datos del BCR

2- Calcule el IHH de El Salvador, con México, Estados Unidos y Canadá, durante el periodo 2017-2020, normalizado.

data.frame("anios"=2017:2020,
           "IHH_Mexico"=sapply(X=2017:2020,FUN = indicadores_IHH_Herfindahl_Hirschmann_anual,codigo_pais=484,normalizado = TRUE),
           "IHH_USA"=sapply(X=2017:2020,FUN = indicadores_IHH_Herfindahl_Hirschmann_anual,codigo_pais=840,normalizado=TRUE),
           "IHH_Canada"=sapply(X=2017:2020,FUN = indicadores_IHH_Herfindahl_Hirschmann_anual,codigo_pais=124,normalizado=TRUE))%>%
  kable(caption = "Indicador de IHH de El Salvador con: México, Estados Unidos y Canadá, periodo 2017-2020,normalizado")%>%
  kable_styling(bootstrap_options = "striped",
                full_width = TRUE)%>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Indicador de IHH de El Salvador con: México, Estados Unidos y Canadá, periodo 2017-2020,normalizado

anios	IHH_Mexico	IHH_USA	IHH_Canada
2017	0.0165526	0.0055910	0.1231022
2018	0.0182162	0.0056610	0.0084443
2019	0.0142813	0.0058727	0.1190248
2020	0.0162952	0.0099441	0.0189107
* Elaboración propia con base en datos del BCR

3- Calcule las exportaciones totales de El Salvador hacia la región de África Oriental, para el periodo 2017-2020 son (en millones de US$)

data_comercio_exterior_actualizada %>%
  select("pais", "sac","anio","mes","valor_fob","region_intermedia") %>%
  filter(region_intermedia=="África Oriental",anio %in% 2017:2020,valor_fob>0) %>%
  group_by(anio) %>%
  summarise(`Total Exportaciones ESA MM US$`=sum(valor_fob)/1e6) %>% 
  head() %>% kable(caption = "Exportaciones totales de El Salvador en millones de US$ hacia region de África oriental") %>% kable_minimal()  %>% 
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Exportaciones totales de El Salvador en millones de US$ hacia region de África oriental

anio	Total Exportaciones ESA MM US$
2017	0.6734228
2018	4.0123130
2019	0.8439266
2020	0.0013060
* Elaboración propia con base en datos del BCR

4- Obtenga el Saldo de la balanza comercial de El Salvador, con Latinoamérica, para el periodo 2017-2019, (en millones de US$)

data_comercio_exterior_actualizada %>%
  filter(sub_region=="América Latina Y El Caribe",anio %in% c(2017:2019)) %>%
  group_by(anio) %>%
  summarise(`Total Exportaciones MM US$`=sum(valor_fob)/1e6,
            `Total Importaciones MM US$`=sum(valor_cif)/1e6,
            `Balanza Comercial ESA-LA MM $`=`Total Exportaciones MM US$`-`Total Importaciones MM US$`) %>% 
  head() %>% kable(caption = "Saldo de la Balanza comercial ESA-LA para el periodo 2017-2019") %>% kable_minimal()  %>%  
  add_footnote(label="Elaboración propia con base en datos del BCR",
               notation="symbol") %>%  kable_minimal()

Saldo de la Balanza comercial ESA-LA para el periodo 2017-2019

anio	Total Exportaciones MM US$	Total Importaciones MM US$	Balanza Comercial ESA-LA MM $
2017	2746.262	3770.895	-1024.633
2018	2922.872	4144.131	-1221.259
2019	3067.961	4553.745	-1485.784
* Elaboración propia con base en datos del BCR

CLAVE 1

PARTE 2

Usando los datos de la Penn World Table, de la Universidad de Groningen. Resuelva los siguientes requerimientos (es importante mostrar todos sus resultados en formato tabular):

1- Construya una función que le permita elegir el país y filtrar para un periodo(inicio,final), muestre su uso filtrando los datos para El Salvador, en el periodo de 1950-2014.

library(pwt9)
library(dplyr)
library(kableExtra) 
data("pwt9.0") 
options(scipen =999999)

funcion_consulta_pais<-function(iso_pais,anio_inicio,anio_final){     
  enquo(iso_pais)->iso_pais 
pwt9.0 %>% filter(isocode==!!iso_pais, 
                  year>=anio_inicio, 
                  year<=anio_final)->df
return(df) 
}

funcion_consulta_pais(iso_pais ="SLV",1950,2014) %>% 
  kable(caption = "Función consulta paises, SLV 1950-2014", 
        digits = 2, align ="l") %>%
  kable_styling(bootstrap_options ="striped",
                full_width =TRUE
)

Función consulta paises, SLV 1950-2014

	country	isocode	year	currency	rgdpe	rgdpo	pop	emp	avh	hc	ccon	cda	cgdpe	cgdpo	ck	ctfp	cwtfp	rgdpna	rconna	rdana	rkna	rtfpna	rwtfpna	labsh	delta	xr	pl_con	pl_da	pl_gdpo	i_cig	i_xm	i_xr	i_outlier	cor_exp	statcap	csh_c	csh_i	csh_g	csh_x	csh_m	csh_r	pl_c	pl_i	pl_g	pl_x	pl_m	pl_k
SLV-1950	El Salvador	SLV	1950	US Dollar	1328.68	1162.96	1.97	NA	NA	1.22	1106.17	1178.05	1276.18	1136.44	1489.37	NA	NA	6510.53	6671.51	6988.91	14268.64	NA	NA	NA	0.04	1	0.07	0.08	0.09	extrapolated	extrapolated	market	no	NA	NA	0.86	0.06	0.11	0.23	-0.27	0.00	0.07	0.14	0.06	0.10	0.06	0.17
SLV-1951	El Salvador	SLV	1951	US Dollar	1406.21	1163.40	2.03	NA	NA	1.23	1178.87	1266.99	1349.93	1105.53	1544.81	NA	NA	6766.86	7134.09	7564.44	14326.17	NA	NA	NA	0.04	1	0.08	0.09	0.11	extrapolated	extrapolated	market	no	NA	NA	0.94	0.08	0.12	0.23	-0.38	0.00	0.08	0.16	0.07	0.12	0.06	0.19
SLV-1952	El Salvador	SLV	1952	US Dollar	1488.13	1253.54	2.08	NA	NA	1.23	1251.23	1349.25	1420.91	1192.77	1588.55	NA	NA	7264.29	7644.17	8093.95	14409.00	NA	NA	NA	0.04	1	0.08	0.09	0.10	extrapolated	extrapolated	market	no	NA	NA	0.92	0.08	0.13	0.22	-0.35	0.00	0.08	0.15	0.07	0.12	0.06	0.18
SLV-1953	El Salvador	SLV	1953	US Dollar	1593.58	1346.11	2.14	NA	NA	1.24	1362.83	1463.97	1525.12	1305.57	1600.30	NA	NA	7817.62	8292.65	8739.85	14508.44	NA	NA	NA	0.04	1	0.09	0.09	0.11	extrapolated	extrapolated	market	no	NA	NA	0.91	0.08	0.13	0.20	-0.33	0.00	0.09	0.16	0.07	0.12	0.06	0.19
SLV-1954	El Salvador	SLV	1954	US Dollar	1690.62	1356.89	2.20	NA	NA	1.24	1450.98	1549.41	1615.58	1317.64	1580.19	NA	NA	8021.83	8827.66	9217.75	14583.29	NA	NA	NA	0.04	1	0.09	0.10	0.12	extrapolated	extrapolated	market	no	NA	NA	0.96	0.07	0.15	0.18	-0.36	0.00	0.09	0.16	0.08	0.16	0.07	0.20
SLV-1955	El Salvador	SLV	1955	US Dollar	1753.40	1425.70	2.26	NA	NA	1.25	1517.85	1618.17	1669.60	1384.10	1582.67	NA	NA	8445.04	9284.06	9673.21	14673.44	NA	NA	NA	0.04	1	0.10	0.10	0.12	extrapolated	extrapolated	market	no	NA	NA	0.96	0.07	0.13	0.20	-0.37	0.00	0.10	0.17	0.08	0.14	0.07	0.20
SLV-1956	El Salvador	SLV	1956	US Dollar	1828.69	1514.19	2.33	NA	NA	1.25	1564.43	1707.02	1730.09	1459.71	1657.90	NA	NA	8990.82	9644.38	10412.62	15037.84	NA	NA	NA	0.04	1	0.10	0.10	0.12	extrapolated	extrapolated	market	no	NA	NA	0.94	0.10	0.14	0.21	-0.38	0.00	0.10	0.17	0.08	0.14	0.07	0.20
SLV-1957	El Salvador	SLV	1957	US Dollar	1975.54	1593.03	2.40	NA	NA	1.26	1624.57	1784.29	1864.72	1527.84	1710.36	NA	NA	9393.49	10034.27	10928.63	15464.78	NA	NA	NA	0.05	1	0.09	0.10	0.12	extrapolated	extrapolated	market	no	NA	NA	0.92	0.10	0.15	0.21	-0.38	0.00	0.09	0.16	0.08	0.16	0.07	0.20
SLV-1958	El Salvador	SLV	1958	US Dollar	1892.23	1650.91	2.47	NA	NA	1.26	1627.99	1763.58	1785.91	1607.49	1703.70	NA	NA	9519.50	10066.13	10701.72	15672.67	NA	NA	NA	0.05	1	0.10	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.87	0.08	0.14	0.21	-0.31	0.00	0.10	0.17	0.08	0.12	0.08	0.21
SLV-1959	El Salvador	SLV	1959	US Dollar	1908.08	1710.75	2.55	NA	NA	1.27	1668.14	1771.13	1790.04	1664.50	1698.59	NA	NA	9704.64	10381.46	10665.75	15645.99	NA	NA	NA	0.04	1	0.09	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.86	0.06	0.14	0.22	-0.29	0.00	0.10	0.17	0.08	0.11	0.08	0.21
SLV-1960	El Salvador	SLV	1960	US Dollar	1935.00	1727.86	2.63	NA	NA	1.27	1713.03	1907.99	1833.12	1611.01	1723.05	NA	NA	10141.43	10527.88	11719.51	16277.75	NA	NA	NA	0.05	1	0.10	0.10	0.12	extrapolated	extrapolated	market	no	NA	NA	0.92	0.12	0.15	0.22	-0.40	0.00	0.10	0.15	0.08	0.11	0.07	0.19
SLV-1961	El Salvador	SLV	1961	US Dollar	1988.43	1832.71	2.71	NA	NA	1.27	1722.87	1888.86	1898.73	1738.63	1761.34	NA	NA	10299.34	10425.42	11426.50	16665.32	NA	NA	NA	0.05	1	0.09	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.84	0.10	0.15	0.23	-0.32	0.00	0.10	0.16	0.08	0.11	0.08	0.19
SLV-1962	El Salvador	SLV	1962	US Dollar	2190.93	2056.03	2.80	NA	NA	1.28	1908.77	2075.22	2094.64	2008.37	1795.50	NA	NA	11393.63	11522.74	12500.36	17062.97	NA	NA	NA	0.05	1	0.10	0.10	0.10	extrapolated	extrapolated	market	no	NA	NA	0.81	0.08	0.14	0.24	-0.28	0.00	0.10	0.16	0.07	0.10	0.09	0.19
SLV-1963	El Salvador	SLV	1963	US Dollar	2262.95	2125.34	2.89	NA	NA	1.28	2000.29	2183.82	2154.52	2091.82	1823.31	NA	NA	11892.12	12173.60	13265.75	17543.06	NA	NA	NA	0.05	1	0.10	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.82	0.09	0.13	0.26	-0.31	0.00	0.10	0.16	0.08	0.10	0.09	0.19
SLV-1964	El Salvador	SLV	1964	US Dollar	2459.91	2274.69	2.98	NA	NA	1.29	2139.12	2404.75	2332.53	2232.75	1897.55	NA	NA	13026.59	13116.39	14919.76	18561.30	NA	NA	NA	0.05	1	0.10	0.11	0.11	extrapolated	extrapolated	market	no	NA	NA	0.83	0.12	0.12	0.26	-0.34	0.00	0.10	0.16	0.08	0.11	0.09	0.20
SLV-1965	El Salvador	SLV	1965	US Dollar	2638.42	2413.01	3.07	NA	NA	1.29	2302.30	2551.58	2502.29	2375.56	1982.95	NA	NA	13802.44	14112.00	15722.13	19365.05	NA	NA	NA	0.05	1	0.10	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.84	0.10	0.13	0.25	-0.32	0.00	0.10	0.16	0.08	0.12	0.10	0.20
SLV-1966	El Salvador	SLV	1966	US Dollar	2809.26	2571.69	3.18	NA	NA	1.30	2499.56	2790.95	2666.59	2550.16	2106.57	NA	NA	14927.10	15302.31	17257.17	20419.53	NA	NA	NA	0.06	1	0.10	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.85	0.11	0.13	0.23	-0.33	0.00	0.10	0.16	0.07	0.12	0.10	0.19
SLV-1967	El Salvador	SLV	1967	US Dollar	2962.03	2743.17	3.29	NA	NA	1.30	2645.24	2897.41	2824.93	2745.08	2182.76	NA	NA	15570.67	16075.05	17633.51	21093.55	NA	NA	NA	0.06	1	0.10	0.10	0.11	extrapolated	extrapolated	market	no	NA	NA	0.83	0.09	0.13	0.24	-0.30	0.00	0.10	0.17	0.07	0.11	0.10	0.20
SLV-1968	El Salvador	SLV	1968	US Dollar	2973.30	2871.79	3.41	NA	NA	1.31	2685.81	2881.08	2844.07	2889.15	2199.78	NA	NA	15887.05	16238.39	17227.88	21297.18	NA	NA	NA	0.06	1	0.10	0.11	0.10	extrapolated	extrapolated	market	no	NA	NA	0.79	0.07	0.14	0.25	-0.25	0.00	0.11	0.18	0.07	0.11	0.11	0.21
SLV-1969	El Salvador	SLV	1969	US Dollar	3072.13	2982.77	3.53	NA	NA	1.31	2770.12	2991.30	2928.17	2991.86	2260.09	NA	NA	16480.47	16726.62	17930.42	21689.30	NA	NA	NA	0.06	1	0.10	0.11	0.10	extrapolated	extrapolated	market	no	NA	NA	0.77	0.07	0.15	0.23	-0.23	0.00	0.11	0.19	0.07	0.11	0.12	0.22
SLV-1970	El Salvador	SLV	1970	US Dollar	3365.30	3070.21	3.67	NA	NA	1.32	2927.78	3175.92	3199.56	3084.66	2350.38	NA	NA	17229.57	17737.79	19129.14	22254.20	NA	NA	NA	0.06	1	0.10	0.11	0.11	extrapolated	extrapolated	market	no	NA	NA	0.79	0.08	0.16	0.21	-0.24	0.00	0.10	0.18	0.07	0.13	0.11	0.21
SLV-1971	El Salvador	SLV	1971	US Dollar	3400.10	3162.70	3.77	NA	NA	1.33	2983.48	3288.68	3220.79	3166.82	2453.24	NA	NA	18064.77	18239.38	20145.91	23028.00	NA	NA	NA	0.06	1	0.10	0.11	0.11	extrapolated	extrapolated	market	no	NA	NA	0.79	0.10	0.15	0.21	-0.25	0.00	0.11	0.18	0.08	0.13	0.12	0.22
SLV-1972	El Salvador	SLV	1972	US Dollar	3625.13	3332.76	3.86	NA	NA	1.34	3142.78	3429.80	3420.30	3342.62	2626.67	NA	NA	19058.37	19195.18	20843.31	24376.66	NA	NA	NA	0.06	1	0.10	0.11	0.11	extrapolated	extrapolated	market	no	NA	NA	0.77	0.09	0.17	0.24	-0.25	-0.01	0.11	0.19	0.07	0.14	0.13	0.22
SLV-1973	El Salvador	SLV	1973	US Dollar	3889.18	3535.08	3.96	NA	NA	1.35	3363.57	3739.71	3641.35	3510.52	2769.80	NA	NA	20023.17	20695.36	23138.52	25351.46	NA	NA	NA	0.06	1	0.11	0.12	0.12	extrapolated	extrapolated	market	no	NA	NA	0.78	0.11	0.17	0.23	-0.30	0.00	0.12	0.21	0.07	0.16	0.14	0.26
SLV-1974	El Salvador	SLV	1974	US Dollar	3845.12	3708.94	4.05	NA	NA	1.36	3419.45	3909.46	3613.52	3589.11	2981.38	NA	NA	21304.77	21122.95	24593.07	26587.17	NA	NA	NA	0.06	1	0.13	0.14	0.14	extrapolated	extrapolated	market	no	NA	NA	0.79	0.14	0.17	0.26	-0.36	0.00	0.14	0.24	0.10	0.18	0.17	0.30
SLV-1975	El Salvador	SLV	1975	US Dollar	3991.86	3920.17	4.15	1.22	NA	1.37	3559.14	4010.07	3760.65	3768.43	3251.17	NA	NA	22492.77	21941.90	24788.35	28534.64	NA	NA	NA	0.06	1	0.14	0.16	0.16	extrapolated	extrapolated	market	no	NA	NA	0.77	0.12	0.17	0.27	-0.32	-0.01	0.15	0.29	0.10	0.19	0.19	0.33
SLV-1976	El Salvador	SLV	1976	US Dollar	4630.99	4075.13	4.24	1.27	NA	1.38	3937.18	4431.38	4343.84	3940.43	3467.64	NA	NA	23378.36	24298.49	27443.89	30453.12	NA	NA	NA	0.07	1	0.16	0.17	0.19	extrapolated	extrapolated	market	no	NA	NA	0.81	0.13	0.19	0.24	-0.35	-0.01	0.17	0.30	0.12	0.29	0.20	0.36
SLV-1977	El Salvador	SLV	1977	US Dollar	5449.36	4217.09	4.33	1.32	NA	1.39	4365.59	5064.45	5118.73	4090.55	3840.36	NA	NA	24789.56	26910.18	32121.75	33198.95	NA	NA	NA	0.07	1	0.16	0.18	0.23	extrapolated	extrapolated	market	no	NA	NA	0.88	0.17	0.19	0.20	-0.44	0.00	0.17	0.32	0.14	0.44	0.20	0.37
SLV-1978	El Salvador	SLV	1978	US Dollar	5117.85	4515.62	4.42	1.38	NA	1.40	4523.67	5243.15	4798.95	4355.54	4239.02	NA	NA	26387.96	27856.90	33214.86	35825.07	NA	NA	NA	0.07	1	0.19	0.21	0.23	extrapolated	extrapolated	market	no	NA	NA	0.84	0.17	0.20	0.22	-0.42	0.00	0.20	0.34	0.15	0.32	0.22	0.38
SLV-1979	El Salvador	SLV	1979	US Dollar	5126.82	4554.47	4.50	1.44	NA	1.41	4269.27	4817.53	4809.16	4363.93	4503.05	NA	NA	25934.36	26117.22	29952.76	37426.36	NA	NA	NA	0.07	1	0.22	0.24	0.26	extrapolated	extrapolated	market	no	NA	NA	0.78	0.13	0.20	0.31	-0.41	0.00	0.23	0.37	0.17	0.31	0.23	0.40
SLV-1980	El Salvador	SLV	1980	US Dollar	4649.40	4278.78	4.58	1.39	NA	1.42	3981.78	4354.68	4395.12	4056.50	4601.36	NA	NA	23680.76	24121.24	26371.44	37785.80	NA	NA	NA	0.07	1	0.25	0.27	0.29	benchmark	extrapolated	market	no	0.45	NA	0.77	0.09	0.21	0.29	-0.36	0.00	0.27	0.42	0.20	0.34	0.26	0.44
SLV-1981	El Salvador	SLV	1981	US Dollar	4158.87	4066.77	4.65	1.39	NA	1.44	3844.26	4213.65	3941.54	3838.30	4800.85	NA	NA	21722.37	22491.96	24689.91	37937.38	NA	NA	NA	0.06	1	0.27	0.29	0.30	interpolated	extrapolated	market	no	NA	NA	0.77	0.10	0.23	0.24	-0.34	0.00	0.30	0.44	0.20	0.32	0.29	0.46
SLV-1982	El Salvador	SLV	1982	US Dollar	4018.59	4018.67	4.72	1.39	NA	1.46	3696.28	4041.96	3824.03	3818.75	4955.20	NA	NA	20505.57	20884.33	22829.72	37910.16	NA	NA	NA	0.06	1	0.30	0.31	0.31	interpolated	extrapolated	market	no	NA	NA	0.73	0.09	0.24	0.21	-0.26	0.00	0.32	0.45	0.20	0.34	0.33	0.48
SLV-1983	El Salvador	SLV	1983	US Dollar	4132.64	4157.73	4.79	1.38	NA	1.48	3822.89	4145.28	3932.27	3985.51	4915.65	NA	NA	20663.97	21008.33	22708.59	37828.39	NA	NA	NA	0.06	1	0.33	0.34	0.34	interpolated	extrapolated	market	no	NA	NA	0.73	0.08	0.23	0.24	-0.28	0.00	0.36	0.50	0.23	0.35	0.36	0.54
SLV-1984	El Salvador	SLV	1984	US Dollar	4359.04	4385.90	4.86	1.38	NA	1.50	4078.10	4414.78	4134.59	4203.64	5056.05	NA	NA	21139.17	21835.71	23572.51	37889.25	NA	NA	NA	0.06	1	0.36	0.37	0.36	interpolated	benchmark	market	no	NA	NA	0.74	0.08	0.23	0.22	-0.27	0.00	0.39	0.54	0.25	0.36	0.39	0.59
SLV-1985	El Salvador	SLV	1985	US Dollar	4607.48	4457.17	4.92	1.37	NA	1.52	4401.04	4728.10	4395.92	4341.91	5212.89	NA	NA	21556.77	22713.37	24274.54	38249.86	NA	NA	NA	0.05	1	0.41	0.43	0.43	interpolated	benchmark	market	no	NA	NA	0.77	0.08	0.25	0.25	-0.34	0.00	0.46	0.63	0.27	0.38	0.38	0.67
SLV-1986	El Salvador	SLV	1986	US Dollar	4992.92	4837.99	4.99	1.43	NA	1.55	4592.70	4999.51	4789.88	4753.40	5513.21	NA	NA	21693.57	22798.42	24897.78	38841.21	NA	NA	NA	0.05	1	0.52	0.54	0.55	interpolated	benchmark	market	no	NA	NA	0.72	0.09	0.25	0.32	-0.37	0.00	0.58	0.85	0.31	0.43	0.43	0.90
SLV-1987	El Salvador	SLV	1987	US Dollar	5051.60	4840.54	5.05	1.49	NA	1.57	4786.57	5187.15	4842.90	4730.77	5833.61	NA	NA	22276.77	23019.10	24972.50	39691.29	NA	NA	NA	0.05	1	0.60	0.63	0.64	interpolated	benchmark	market	no	NA	NA	0.75	0.08	0.26	0.26	-0.35	0.00	0.69	0.94	0.34	0.48	0.48	0.97
SLV-1988	El Salvador	SLV	1988	US Dollar	5382.77	5085.71	5.12	1.54	NA	1.59	5001.59	5500.93	5166.40	4977.86	6169.56	NA	NA	22636.77	23238.74	25760.60	40608.01	NA	NA	NA	0.05	1	0.67	0.70	0.72	interpolated	benchmark	market	no	NA	NA	0.75	0.10	0.26	0.22	-0.33	0.00	0.78	0.92	0.36	0.51	0.49	0.99
SLV-1989	El Salvador	SLV	1989	US Dollar	5544.97	5135.78	5.18	1.60	NA	1.61	5268.28	5894.86	5336.99	5043.73	6527.53	NA	NA	22874.37	23690.60	26922.24	41774.36	NA	NA	NA	0.05	1	0.77	0.79	0.84	interpolated	benchmark	market	no	NA	NA	0.79	0.12	0.26	0.22	-0.39	0.00	0.89	1.04	0.40	0.51	0.51	1.10
SLV-1990	El Salvador	SLV	1990	US Dollar	5535.06	4805.48	5.25	1.67	NA	1.63	5606.01	6046.09	5366.17	4701.27	6861.52	NA	NA	23651.96	24139.15	26146.76	42318.50	NA	NA	NA	0.05	1	0.85	0.89	1.02	interpolated	benchmark	market	no	NA	NA	0.92	0.09	0.27	0.37	-0.65	0.00	0.98	1.51	0.38	0.51	0.49	1.49
SLV-1991	El Salvador	SLV	1991	US Dollar	5936.14	4939.16	5.32	1.73	NA	1.66	5953.35	6497.96	5734.86	4986.13	7202.85	NA	NA	24497.86	24875.98	27400.65	43371.30	NA	NA	NA	0.05	1	0.87	0.93	1.07	interpolated	benchmark	market	no	NA	NA	0.93	0.11	0.26	0.34	-0.64	0.00	1.01	1.50	0.40	0.54	0.51	1.53
SLV-1992	El Salvador	SLV	1992	US Dollar	6504.19	5411.80	5.39	1.79	NA	1.69	6571.22	7304.61	6278.40	5206.08	7687.24	NA	NA	26345.81	26750.48	30236.16	45022.50	NA	NA	NA	0.05	1	0.89	0.95	1.14	interpolated	benchmark	market	no	NA	NA	1.00	0.14	0.26	0.36	-0.76	0.00	1.01	1.50	0.41	0.51	0.49	1.60
SLV-1993	El Salvador	SLV	1993	US Dollar	7346.24	6345.94	5.46	1.89	NA	1.72	7273.72	8122.34	7078.08	6101.31	8461.29	NA	NA	28287.37	28806.22	32671.09	47214.08	NA	NA	NA	0.05	1	0.92	0.98	1.14	interpolated	benchmark	market	no	NA	NA	0.96	0.14	0.23	0.43	-0.76	0.00	1.03	1.52	0.43	0.51	0.51	1.58
SLV-1994	El Salvador	SLV	1994	US Dollar	8207.58	6780.74	5.53	1.97	NA	1.74	8116.86	9098.44	7895.16	6775.15	9419.25	NA	NA	29998.86	30968.71	35479.19	49824.06	NA	NA	NA	0.05	1	0.95	1.02	1.19	interpolated	benchmark	market	no	NA	NA	0.98	0.14	0.22	0.46	-0.81	0.00	1.06	1.62	0.46	0.51	0.52	1.61
SLV-1995	El Salvador	SLV	1995	US Dollar	9318.73	7888.29	5.59	1.99	NA	1.76	9281.09	10435.22	8986.57	7912.95	10640.51	NA	NA	31917.76	33815.81	39097.07	53000.34	NA	NA	NA	0.05	1	0.98	1.06	1.20	interpolated	benchmark	market	no	NA	NA	0.97	0.15	0.20	0.50	-0.82	0.00	1.08	1.65	0.51	0.52	0.56	1.57
SLV-1996	El Salvador	SLV	1996	US Dollar	9934.67	8648.70	5.64	2.02	NA	1.79	9901.10	10819.75	9587.27	8671.39	11636.62	NA	NA	32462.15	34372.49	38158.64	55270.48	NA	NA	NA	0.05	1	1.02	1.08	1.19	interpolated	benchmark	market	no	NA	NA	0.95	0.11	0.19	0.46	-0.71	0.00	1.10	1.71	0.58	0.54	0.57	1.57
SLV-1997	El Salvador	SLV	1997	US Dollar	10864.99	9510.29	5.69	2.04	NA	1.81	10656.52	11679.93	10460.34	9594.17	12896.58	NA	NA	33840.60	35405.27	39482.61	57859.71	NA	NA	NA	0.05	1	1.01	1.06	1.16	interpolated	benchmark	market	no	NA	NA	0.92	0.11	0.19	0.58	-0.79	0.00	1.10	1.64	0.56	0.52	0.55	1.51
SLV-1998	El Salvador	SLV	1998	US Dollar	11822.44	9966.68	5.74	2.13	NA	1.83	11420.49	12730.70	11336.87	10310.08	14480.63	NA	NA	35109.19	36252.88	41511.21	60866.61	NA	NA	NA	0.05	1	1.00	1.06	1.16	interpolated	benchmark	market	no	NA	NA	0.92	0.13	0.19	0.58	-0.81	0.00	1.08	1.61	0.60	0.50	0.53	1.44
SLV-1999	El Salvador	SLV	1999	US Dollar	12738.64	10614.19	5.78	2.15	NA	1.86	12412.75	13745.82	12235.42	11020.90	16210.29	NA	NA	36320.14	37471.43	42427.06	63673.29	NA	NA	NA	0.05	1	0.96	1.02	1.13	interpolated	benchmark	market	no	NA	66.67	0.94	0.12	0.18	0.58	-0.83	0.00	1.03	1.54	0.61	0.48	0.51	1.35
SLV-2000	El Salvador	SLV	2000	US Dollar	13578.46	11809.71	5.81	2.16	NA	1.88	13529.31	15016.76	13054.28	11988.98	18214.93	NA	NA	37101.99	38822.00	43901.07	66648.95	NA	NA	NA	0.05	1	0.95	1.01	1.10	interpolated	benchmark	market	no	NA	NA	0.95	0.12	0.18	0.66	-0.91	0.00	1.02	1.49	0.62	0.46	0.51	1.33
SLV-2001	El Salvador	SLV	2001	US Dollar	14789.43	12413.91	5.84	2.20	NA	1.89	14839.51	16534.24	14277.92	12442.97	20437.46	NA	NA	37736.04	40093.39	45452.23	69572.88	NA	NA	NA	0.05	1	0.92	0.97	1.11	interpolated	benchmark	market	no	NA	NA	1.00	0.14	0.19	0.64	-0.97	0.00	0.98	1.36	0.61	0.45	0.48	1.24
SLV-2002	El Salvador	SLV	2002	US Dollar	16034.23	13837.70	5.87	2.18	NA	1.91	15961.07	17768.06	15489.48	13999.21	22973.78	NA	NA	38619.32	40673.87	45836.98	72607.56	NA	NA	NA	0.05	1	0.88	0.92	1.02	interpolated	benchmark	market	no	NA	NA	0.96	0.13	0.18	0.59	-0.86	0.00	0.93	1.30	0.60	0.46	0.49	1.16
SLV-2003	El Salvador	SLV	2003	US Dollar	17350.32	15385.29	5.90	2.24	NA	1.92	17365.37	19451.20	16781.77	15672.60	26116.70	NA	NA	39507.68	41409.53	47055.91	75721.65	NA	NA	NA	0.05	1	0.86	0.90	0.96	interpolated	benchmark	market	no	NA	NA	0.94	0.13	0.17	0.54	-0.78	0.00	0.91	1.22	0.57	0.49	0.53	1.10
SLV-2004	El Salvador	SLV	2004	US Dollar	18765.11	16650.42	5.93	2.21	NA	1.93	19149.89	21319.06	18169.02	16952.93	30179.75	NA	NA	40238.82	42535.23	47876.02	78393.28	NA	NA	NA	0.05	1	0.83	0.87	0.93	interpolated	benchmark	market	no	NA	68.33	0.97	0.13	0.16	0.48	-0.74	0.00	0.88	1.18	0.55	0.52	0.56	1.02
SLV-2005	El Salvador	SLV	2005	US Dollar	20962.34	19788.17	5.95	2.25	NA	1.95	22115.60	24575.89	20735.33	19766.06	35501.44	NA	NA	41672.35	44661.03	50177.75	81070.17	NA	NA	NA	0.05	1	0.79	0.82	0.86	interpolated	benchmark	market	no	NA	71.67	0.96	0.12	0.16	0.43	-0.67	0.00	0.83	1.12	0.53	0.52	0.57	0.93
SLV-2006	El Salvador	SLV	2006	US Dollar	23670.12	22070.84	5.97	2.30	NA	1.96	25040.70	28038.22	23271.09	22347.13	42249.99	NA	NA	43302.64	46758.60	53000.10	84467.60	NA	NA	NA	0.05	1	0.77	0.80	0.83	interpolated	benchmark	market	no	NA	71.67	0.97	0.13	0.15	0.39	-0.64	0.00	0.80	1.04	0.55	0.55	0.60	0.83
SLV-2007	El Salvador	SLV	2007	US Dollar	26954.08	25463.66	5.99	2.37	NA	1.98	29046.20	32438.27	26499.25	25836.85	49601.39	NA	NA	44965.51	49451.01	55837.31	88289.65	NA	NA	NA	0.05	1	0.73	0.76	0.78	interpolated	benchmark	market	no	NA	73.33	0.99	0.13	0.14	0.33	-0.58	0.00	0.76	0.97	0.53	0.61	0.64	0.75
SLV-2008	El Salvador	SLV	2008	US Dollar	30053.27	28863.73	6.00	2.38	NA	1.99	33050.30	36672.09	29859.18	28644.17	57652.11	NA	NA	45538.08	50258.55	56225.36	91446.33	NA	NA	NA	0.05	1	0.70	0.72	0.75	interpolated	benchmark	market	no	NA	83.33	1.02	0.13	0.13	0.29	-0.57	0.00	0.72	0.90	0.52	0.69	0.65	0.70
SLV-2009	El Salvador	SLV	2009	US Dollar	32585.90	31136.00	6.02	2.36	NA	2.00	33882.79	37215.62	32227.38	31383.49	66042.59	NA	NA	44111.37	45806.52	50506.80	92998.63	NA	NA	NA	0.05	1	0.62	0.64	0.66	interpolated	benchmark	market	no	NA	83.33	0.95	0.11	0.13	0.23	-0.41	0.00	0.64	0.83	0.52	0.68	0.62	0.65
SLV-2010	El Salvador	SLV	2010	US Dollar	37684.82	37108.66	6.04	2.39	NA	2.02	39829.33	43812.20	37471.93	37264.89	77955.60	NA	NA	44713.64	46830.70	51644.92	94734.91	NA	NA	NA	0.05	1	0.56	0.57	0.57	interpolated	benchmark	market	no	NA	90.00	0.95	0.11	0.12	0.22	-0.39	0.00	0.56	0.72	0.50	0.69	0.63	0.56
SLV-2011	El Salvador	SLV	2011	US Dollar	45166.76	45704.81	6.06	2.45	NA	2.05	48017.28	53605.34	45166.76	45704.81	97264.73	NA	NA	45704.81	48017.28	53605.34	97264.73	NA	NA	NA	0.05	1	0.50	0.51	0.51	benchmark	benchmark	market	no	0.64	85.56	0.94	0.12	0.11	0.19	-0.37	0.00	0.50	0.59	0.52	0.73	0.64	0.47
SLV-2012	El Salvador	SLV	2012	US Dollar	46164.43	47179.36	6.07	2.51	NA	2.08	49224.95	54663.91	46147.61	46956.67	99345.64	NA	NA	46564.57	49170.92	54642.68	99598.18	NA	NA	NA	0.05	1	0.50	0.52	0.51	extrapolated	benchmark	market	no	NA	91.00	0.94	0.12	0.11	0.19	-0.35	0.00	0.50	0.62	0.53	0.69	0.63	0.49
SLV-2013	El Salvador	SLV	2013	US Dollar	46742.54	47392.96	6.09	2.56	NA	2.11	49761.24	55572.07	46618.41	47147.33	103172.30	NA	NA	47424.43	49694.70	55754.14	102483.91	NA	NA	NA	0.05	1	0.51	0.52	0.52	extrapolated	benchmark	market	no	NA	91.11	0.94	0.12	0.11	0.19	-0.37	0.00	0.51	0.63	0.54	0.70	0.63	0.48
SLV-2014	El Salvador	SLV	2014	US Dollar	47903.34	48970.29	6.11	2.60	NA	2.14	50944.91	56342.74	47846.68	48643.55	107174.82	NA	NA	48350.45	50767.72	56361.07	104730.74	NA	NA	NA	0.05	1	0.51	0.53	0.52	extrapolated	benchmark	market	no	NA	91.11	0.94	0.11	0.11	0.19	-0.35	0.00	0.51	0.63	0.55	0.70	0.65	0.47

2- Construya una función que le permita elegir todas las variables de la categoria “Trade detail”, muestre su uso para los datos de Argentina

calculo_trade_detail <- function(iso_pais,anio_inicio,anio_final){
  enquo(iso_pais)-> iso_pais
pwt9.0 %>% filter(isocode==!!iso_pais,
                  year>=anio_inicio,
                  year<=anio_final) %>%
    select(isocode, year,pl_x,pl_m, csh_x, csh_m)-> country_trade_detail
  
return(country_trade_detail)
}
calculo_trade_detail(iso_pais = "ARG",1950, 2014) %>%
 kable(caption = "Función consulta Trade detail para: Argentina 1990-2014",
 digits = 3,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Función consulta Trade detail para: Argentina 1990-2014

	isocode	year	pl_x	pl_m	csh_x	csh_m
ARG-1950	ARG	1950	0.129	0.118	0.111	-0.055
ARG-1951	ARG	1951	0.156	0.130	0.091	-0.068
ARG-1952	ARG	1952	0.140	0.146	0.070	-0.052
ARG-1953	ARG	1953	0.123	0.115	0.096	-0.037
ARG-1954	ARG	1954	0.104	0.104	0.098	-0.046
ARG-1955	ARG	1955	0.122	0.118	0.082	-0.051
ARG-1956	ARG	1956	0.216	0.246	0.091	-0.045
ARG-1957	ARG	1957	0.205	0.250	0.091	-0.047
ARG-1958	ARG	1958	0.193	0.230	0.085	-0.043
ARG-1959	ARG	1959	0.250	0.283	0.094	-0.040
ARG-1960	ARG	1960	0.249	0.232	0.086	-0.052
ARG-1961	ARG	1961	0.240	0.171	0.072	-0.057
ARG-1962	ARG	1962	0.136	0.303	0.099	-0.050
ARG-1963	ARG	1963	0.214	0.322	0.095	-0.045
ARG-1964	ARG	1964	0.187	0.216	0.085	-0.056
ARG-1965	ARG	1965	0.219	0.184	0.069	-0.065
ARG-1966	ARG	1966	0.203	0.249	0.078	-0.045
ARG-1967	ARG	1967	0.246	0.271	0.072	-0.049
ARG-1968	ARG	1968	0.254	0.301	0.063	-0.045
ARG-1969	ARG	1969	0.249	0.343	0.069	-0.049
ARG-1970	ARG	1970	0.217	0.321	0.085	-0.055
ARG-1971	ARG	1971	0.263	0.339	0.067	-0.055
ARG-1972	ARG	1972	0.285	0.363	0.042	-0.033
ARG-1973	ARG	1973	0.269	0.309	0.046	-0.027
ARG-1974	ARG	1974	0.255	0.317	0.046	-0.035
ARG-1975	ARG	1975	0.267	0.328	0.092	-0.099
ARG-1976	ARG	1976	0.336	0.441	0.073	-0.043
ARG-1977	ARG	1977	0.315	0.453	0.126	-0.064
ARG-1978	ARG	1978	0.278	0.391	0.134	-0.057
ARG-1979	ARG	1979	0.243	0.313	0.123	-0.082
ARG-1980	ARG	1980	0.212	0.232	0.110	-0.133
ARG-1981	ARG	1981	0.295	0.298	0.115	-0.117
ARG-1982	ARG	1982	0.394	0.484	0.142	-0.081
ARG-1983	ARG	1983	0.422	0.520	0.110	-0.051
ARG-1984	ARG	1984	0.375	0.428	0.113	-0.056
ARG-1985	ARG	1985	0.376	0.422	0.151	-0.061
ARG-1986	ARG	1986	0.421	0.454	0.100	-0.064
ARG-1987	ARG	1987	0.466	0.504	0.079	-0.067
ARG-1988	ARG	1988	0.495	0.536	0.100	-0.054
ARG-1989	ARG	1989	0.504	0.528	0.107	-0.045
ARG-1990	ARG	1990	0.502	0.542	0.122	-0.037
ARG-1991	ARG	1991	0.572	0.585	0.089	-0.060
ARG-1992	ARG	1992	0.489	0.527	0.090	-0.101
ARG-1993	ARG	1993	0.513	0.523	0.080	-0.100
ARG-1994	ARG	1994	0.533	0.552	0.080	-0.105
ARG-1995	ARG	1995	0.569	0.588	0.089	-0.082
ARG-1996	ARG	1996	0.584	0.590	0.077	-0.076
ARG-1997	ARG	1997	0.566	0.569	0.085	-0.097
ARG-1998	ARG	1998	0.532	0.541	0.090	-0.105
ARG-1999	ARG	1999	0.516	0.542	0.087	-0.090
ARG-2000	ARG	2000	0.491	0.514	0.103	-0.095
ARG-2001	ARG	2001	0.477	0.495	0.114	-0.084
ARG-2002	ARG	2002	0.478	0.481	0.127	-0.044
ARG-2003	ARG	2003	0.528	0.511	0.125	-0.060
ARG-2004	ARG	2004	0.568	0.539	0.123	-0.084
ARG-2005	ARG	2005	0.585	0.562	0.125	-0.093
ARG-2006	ARG	2006	0.611	0.580	0.128	-0.099
ARG-2007	ARG	2007	0.672	0.630	0.128	-0.110
ARG-2008	ARG	2008	0.742	0.693	0.138	-0.121
ARG-2009	ARG	2009	0.693	0.642	0.118	-0.089
ARG-2010	ARG	2010	0.713	0.668	0.127	-0.113
ARG-2011	ARG	2011	0.752	0.698	0.134	-0.128
ARG-2012	ARG	2012	0.740	0.726	0.129	-0.111
ARG-2013	ARG	2013	0.751	0.701	0.118	-0.122
ARG-2014	ARG	2014	0.748	0.707	0.106	-0.107

3- Use las funciones creadas en 1 y 2, para generar 2 dataframes, que muestren los datos de “México” y “Canadá” para el periodo 2000-2014

#Ejecutamos funcion 1.
library(dplyr)
library(kableExtra)
funcion_consulta_pais(iso_pais = c("MEX","CAN"),2000,2014)->Mex_Can_Dataframe_1

Mex_Can_Dataframe_1%>%
 kable(caption = "Consultando para: Mexico y Canada 2000-2014",
 digits = 1,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Consultando para: Mexico y Canada 2000-2014

	country	isocode	year	currency	rgdpe	rgdpo	pop	emp	avh	hc	ccon	cda	cgdpe	cgdpo	ck	ctfp	cwtfp	rgdpna	rconna	rdana	rkna	rtfpna	rwtfpna	labsh	delta	xr	pl_con	pl_da	pl_gdpo	i_cig	i_xm	i_xr	i_outlier	cor_exp	statcap	csh_c	csh_i	csh_g	csh_x	csh_m	csh_r	pl_c	pl_i	pl_g	pl_x	pl_m	pl_k
CAN-2001	Canada	CAN	2001	Canadian Dollar	1166188	1119308	31.0	15.1	1768.0	3.5	814203.9	1079932	1145022	1144414	3268334	0.9	0.8	1190649	782785.5	1041029	3905941	1.0	0.9	0.6	0	1.5	0.7	0.6	0.6	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.4	-0.4	0	0.6	0.5	0.8	0.5	0.5	0.6
CAN-2003	Canada	CAN	2003	Canadian Dollar	1211094	1184269	31.6	15.8	1732.1	3.5	858441.9	1148489	1194611	1200543	3349291	0.9	0.8	1247575	832796.8	1119539	4151862	1.0	0.9	0.6	0	1.4	0.8	0.7	0.7	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.4	-0.3	0	0.7	0.6	1.0	0.6	0.6	0.8
CAN-2005	Canada	CAN	2005	Canadian Dollar	1311424	1323181	32.3	16.4	1739.2	3.6	918976.9	1263380	1315081	1326233	3865556	0.9	0.8	1327435	882079.1	1221829	4462552	1.0	1.0	0.6	0	1.2	0.9	0.9	0.9	benchmark	benchmark	market	no	0.9	NA	0.5	0.3	0.1	0.4	-0.4	0	0.9	0.8	1.1	0.6	0.6	0.9
CAN-2007	Canada	CAN	2007	Canadian Dollar	1376870	1384391	33.0	17.3	1724.7	3.6	969776.7	1342214	1370408	1395106	4445640	0.9	0.8	1389595	950916.3	1319552	4812567	1.0	1.0	0.6	0	1.1	1.1	1.1	1.0	interpolated	benchmark	market	no	NA	NA	0.5	0.3	0.2	0.4	-0.4	0	1.1	0.9	1.3	0.7	0.7	1.1
CAN-2009	Canada	CAN	2009	Canadian Dollar	1310934	1304883	33.7	17.4	1678.5	3.6	1000717.9	1325223	1306457	1323073	4794360	0.8	0.8	1367808	994270.1	1323141	5106391	1.0	1.0	0.6	0	1.1	1.1	1.0	1.0	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.3	-0.3	0	1.0	0.9	1.3	0.7	0.7	1.0
CAN-2011	Canada	CAN	2011	Canadian Dollar	1423920	1455816	34.5	18.1	1683.6	3.7	1045868.8	1440603	1423920	1455816	5427466	0.8	0.8	1455816	1045868.8	1440603	5427466	1.0	1.0	0.6	0	1.0	1.3	1.3	1.2	benchmark	benchmark	market	no	0.8	NA	0.5	0.3	0.2	0.4	-0.4	0	1.3	1.1	1.5	0.7	0.7	1.2
CAN-2013	Canada	CAN	2013	Canadian Dollar	1478439	1493624	35.2	18.7	1682.7	3.7	1086339.8	1488701	1465085	1472069	5828469	0.8	0.8	1513537	1084256.5	1500049	5779532	1.0	1.0	0.6	0	1.0	1.3	1.3	1.2	extrapolated	benchmark	market	no	NA	NA	0.6	0.3	0.2	0.4	-0.4	0	1.2	1.1	1.5	0.7	0.7	1.1
MEX-2000	Mexico	MEX	2000	Mexican Peso	1241567	1203299	102.8	38.6	2174.0	2.4	976115.5	1233276	1210525	1196573	2683662	0.7	0.7	1458667	1084404.0	1414794	3850000	1.1	1.1	0.5	0	9.5	0.5	0.5	0.5	interpolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.3	-0.3	0	0.5	0.6	0.4	0.5	0.5	0.7
MEX-2002	Mexico	MEX	2002	Mexican Peso	1265801	1217542	105.6	39.6	2196.1	2.5	1021844.4	1259728	1243224	1219592	2552782	0.7	0.7	1469444	1119252.6	1433203	4150159	1.1	1.0	0.5	0	9.7	0.6	0.6	0.6	benchmark	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.3	-0.3	0	0.6	0.7	0.5	0.5	0.5	0.8
MEX-2004	Mexico	MEX	2004	Mexican Peso	1399936	1345215	108.3	41.2	2123.4	2.5	1114709.0	1384239	1376237	1344221	3077106	0.7	0.7	1552597	1225134.2	1551886	4461555	1.1	1.1	0.4	0	11.3	0.5	0.6	0.6	interpolated	benchmark	market	no	NA	74.4	0.7	0.2	0.1	0.2	-0.3	0	0.6	0.6	0.5	0.6	0.5	0.7
MEX-2006	Mexico	MEX	2006	Mexican Peso	1581637	1542631	111.4	43.1	2141.3	2.5	1244907.5	1576208	1571088	1546752	3770402	0.7	0.7	1679987	1343449.2	1719133	4852529	1.1	1.1	0.4	0	10.9	0.6	0.6	0.6	interpolated	benchmark	market	no	NA	68.9	0.7	0.2	0.1	0.3	-0.3	0	0.6	0.7	0.5	0.6	0.6	0.7
MEX-2008	Mexico	MEX	2008	Mexican Peso	1693705	1677677	115.0	45.0	2173.4	2.6	1345486.1	1729921	1692513	1672410	4036200	0.7	0.7	1758094	1411593.2	1826431	5305337	1.1	1.1	0.4	0	11.1	0.6	0.7	0.7	interpolated	benchmark	market	no	NA	77.8	0.7	0.2	0.2	0.2	-0.3	0	0.7	0.7	0.5	0.7	0.7	0.8
MEX-2010	Mexico	MEX	2010	Mexican Peso	1734610	1694514	118.6	48.3	2128.0	2.6	1381195.4	1742997	1728535	1697135	5054693	0.6	0.6	1761765	1405425.9	1779081	5671746	1.0	1.0	0.4	0	12.6	0.6	0.6	0.6	interpolated	benchmark	market	no	NA	85.6	0.6	0.2	0.2	0.2	-0.3	0	0.7	0.6	0.4	0.7	0.7	0.6
MEX-2012	Mexico	MEX	2012	Mexican Peso	1908250	1862729	122.1	50.8	2106.9	2.6	1535906.1	1947835	1903657	1851572	6089364	0.6	0.6	1904764	1537147.2	1954599	6096434	1.0	1.0	0.4	0	13.2	0.6	0.6	0.6	extrapolated	benchmark	market	no	NA	88.0	0.6	0.2	0.2	0.3	-0.3	0	0.7	0.7	0.4	0.7	0.7	0.6
MEX-2014	Mexico	MEX	2014	Mexican Peso	1987688	1945966	125.4	51.4	2136.8	2.7	1602949.4	2009978	1974138	1934006	6677512	0.6	0.6	1974418	1601032.4	2025506	6498114	1.0	1.0	0.4	0	13.3	0.6	0.7	0.7	extrapolated	benchmark	market	no	NA	85.6	0.6	0.2	0.2	0.3	-0.3	0	0.7	0.7	0.4	0.8	0.7	0.6

#Ejecutamos funcion 2.
library(dplyr)
library(kableExtra)
calculo_trade_detail(iso_pais = c("MEX","CAN"),2000,2014)->Mex_Can_Dataframe_2

Mex_Can_Dataframe_2%>%
 kable(caption = "Consultando para: Mexico y Canada 2000-2014",
 digits = 2,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Consultando para: Mexico y Canada 2000-2014

	isocode	year	pl_x	pl_m	csh_x	csh_m
CAN-2001	CAN	2001	0.55	0.53	0.42	-0.36
CAN-2003	CAN	2003	0.58	0.57	0.39	-0.35
CAN-2005	CAN	2005	0.63	0.62	0.43	-0.39
CAN-2007	CAN	2007	0.68	0.68	0.44	-0.40
CAN-2009	CAN	2009	0.69	0.72	0.35	-0.34
CAN-2011	CAN	2011	0.71	0.74	0.44	-0.42
CAN-2013	CAN	2013	0.74	0.75	0.42	-0.42
MEX-2000	MEX	2000	0.53	0.51	0.26	-0.29
MEX-2002	MEX	2002	0.53	0.49	0.25	-0.28
MEX-2004	MEX	2004	0.58	0.53	0.24	-0.27
MEX-2006	MEX	2006	0.63	0.59	0.26	-0.28
MEX-2008	MEX	2008	0.72	0.68	0.24	-0.27
MEX-2010	MEX	2010	0.71	0.66	0.25	-0.27
MEX-2012	MEX	2012	0.74	0.67	0.27	-0.30
MEX-2014	MEX	2014	0.76	0.70	0.27	-0.29

CLAVE 2

PARTE 2

Usando los datos de la Penn World Table, de la Universidad de Groningen. Resuelva los siguientes requerimientos (es importante mostrar todos sus resultados en formato tabular):

1- Construya una función que le permita elegir el país y filtrar para un periodo(inicio,final), muestre su uso filtrando los datos para Guatemala , en el periodo de 1990-2014.

library(pwt9)
library(dplyr)
library(kableExtra) 
data("pwt9.0") 
options(scipen =999999)

funcion_consulta_pais_2<-function(iso_pais,anio_inicio,anio_final){     
  enquo(iso_pais)->iso_pais 
pwt9.0 %>% filter(isocode==!!iso_pais, 
                  year>=anio_inicio, 
                  year<=anio_final)->df_2
return(df_2) 
}

funcion_consulta_pais_2(iso_pais ="GTM",1990,2014) %>% 
  kable(caption = "Función consulta paises, SLV 1990-2014", 
        digits = 3, align ="l") %>%
  kable_styling(bootstrap_options ="striped",
                full_width =TRUE
)

Función consulta paises, SLV 1990-2014

	country	isocode	year	currency	rgdpe	rgdpo	pop	emp	avh	hc	ccon	cda	cgdpe	cgdpo	ck	ctfp	cwtfp	rgdpna	rconna	rdana	rkna	rtfpna	rwtfpna	labsh	delta	xr	pl_con	pl_da	pl_gdpo	i_cig	i_xm	i_xr	i_outlier	cor_exp	statcap	csh_c	csh_i	csh_g	csh_x	csh_m	csh_r	pl_c	pl_i	pl_g	pl_x	pl_m	pl_k
GTM-1990	Guatemala	GTM	1990	Quetzal	33234.62	34222.74	9.159	2.539	NA	1.505	32241.00	35134.41	33063.18	34293.31	45778.58	0.875	0.885	46215.35	41905.34	47471.36	126784.4	0.958	0.903	0.463	0.068	4.486	0.193	0.206	0.199	interpolated	benchmark	market	no	NA	NA	0.833	0.084	0.107	0.065	-0.098	0.009	0.196	0.355	0.169	0.520	0.489	0.301
GTM-1991	Guatemala	GTM	1991	Quetzal	35438.66	36470.83	9.385	2.605	NA	1.520	33555.41	37250.09	35158.59	36600.20	47208.34	0.903	0.916	47906.02	43432.05	50421.88	129355.2	0.969	0.935	0.463	0.068	5.029	0.225	0.239	0.229	interpolated	benchmark	market	no	NA	NA	0.818	0.101	0.099	0.061	-0.096	0.018	0.231	0.359	0.177	0.542	0.525	0.296
GTM-1992	Guatemala	GTM	1992	Quetzal	36326.25	37987.71	9.619	2.720	NA	1.535	35497.80	40458.93	35981.47	37812.49	49587.25	0.859	0.913	50223.88	45647.37	54848.88	133586.8	0.976	0.978	0.463	0.068	5.171	0.242	0.259	0.246	interpolated	benchmark	market	no	NA	NA	0.839	0.131	0.100	0.068	-0.139	0.001	0.245	0.380	0.212	0.502	0.468	0.360
GTM-1993	Guatemala	GTM	1993	Quetzal	38583.34	40375.68	9.860	2.825	NA	1.549	37369.67	42216.37	38180.74	40147.47	53500.32	0.858	0.889	52196.79	47680.36	56266.14	140097.1	0.964	0.953	0.463	0.068	5.635	0.249	0.266	0.253	interpolated	benchmark	market	no	NA	NA	0.832	0.121	0.099	0.065	-0.142	0.025	0.252	0.400	0.220	0.510	0.468	0.330
GTM-1994	Guatemala	GTM	1994	Quetzal	41145.23	42164.69	10.106	2.960	NA	1.564	39555.75	44458.89	40625.70	42118.18	57302.10	0.841	0.875	54301.94	49909.42	58601.23	144104.8	0.958	0.949	0.463	0.068	5.751	0.269	0.285	0.275	interpolated	benchmark	market	no	NA	NA	0.843	0.116	0.096	0.070	-0.130	0.005	0.274	0.409	0.228	0.508	0.482	0.366
GTM-1995	Guatemala	GTM	1995	Quetzal	43889.57	45114.49	10.357	3.029	NA	1.580	42208.83	47068.03	43522.26	45290.43	62316.18	0.856	0.879	56981.12	52361.34	60906.52	150601.8	0.963	0.944	0.463	0.069	5.810	0.283	0.300	0.288	interpolated	benchmark	market	no	NA	NA	0.844	0.107	0.088	0.078	-0.140	0.022	0.288	0.448	0.241	0.547	0.520	0.334
GTM-1996	Guatemala	GTM	1996	Quetzal	45516.44	46279.23	10.612	3.078	NA	1.594	43993.85	48135.54	45269.62	46609.67	66182.52	0.834	0.850	58669.06	53711.55	60829.76	154488.9	0.968	0.921	0.463	0.068	6.050	0.295	0.311	0.302	interpolated	benchmark	market	no	NA	NA	0.861	0.089	0.082	0.078	-0.127	0.016	0.300	0.477	0.249	0.557	0.532	0.367
GTM-1997	Guatemala	GTM	1997	Quetzal	48241.86	48901.27	10.872	3.178	NA	1.608	46064.64	51158.18	47688.03	49022.37	72300.22	0.811	0.836	61235.07	55940.71	64595.59	163422.1	0.959	0.928	0.463	0.068	6.065	0.317	0.332	0.323	interpolated	benchmark	market	no	NA	NA	0.855	0.104	0.085	0.089	-0.155	0.022	0.323	0.471	0.253	0.535	0.506	0.336
GTM-1998	Guatemala	GTM	1998	Quetzal	51417.23	51953.59	11.137	3.329	NA	1.622	48666.76	55740.56	50502.77	52091.17	79881.70	0.779	0.819	64293.27	58718.48	70643.41	172925.6	0.949	0.957	0.463	0.069	6.395	0.324	0.342	0.332	interpolated	benchmark	market	no	NA	NA	0.846	0.136	0.088	0.096	-0.182	0.016	0.328	0.470	0.284	0.515	0.490	0.360
GTM-1999	Guatemala	GTM	1999	Quetzal	53550.95	54882.24	11.409	3.448	NA	1.637	51127.00	58298.11	52587.78	54994.94	89126.99	0.752	0.775	66766.56	61015.44	72668.62	185427.2	0.928	0.927	0.463	0.072	7.386	0.293	0.311	0.297	interpolated	benchmark	market	no	NA	47.778	0.839	0.130	0.091	0.090	-0.170	0.020	0.295	0.437	0.276	0.494	0.486	0.293
GTM-2000	Guatemala	GTM	2000	Quetzal	56102.14	57968.25	11.689	3.576	NA	1.651	53538.39	61430.30	55067.02	57636.36	96989.82	0.727	0.744	69175.77	63408.13	75548.16	192628.2	0.923	0.925	0.463	0.072	7.763	0.295	0.312	0.298	interpolated	benchmark	market	no	NA	NA	0.834	0.137	0.094	0.099	-0.176	0.011	0.295	0.430	0.295	0.475	0.482	0.321
GTM-2001	Guatemala	GTM	2001	Quetzal	58489.13	61418.70	11.977	3.720	NA	1.644	56344.38	65172.14	57608.37	61010.92	103967.48	0.737	0.754	70788.73	65909.31	78846.05	198709.3	0.920	0.940	0.463	0.056	7.859	0.310	0.325	0.307	interpolated	benchmark	market	no	NA	NA	0.829	0.145	0.094	0.084	-0.192	0.039	0.308	0.417	0.327	0.468	0.479	0.392
GTM-2002	Guatemala	GTM	2002	Quetzal	61456.70	63811.87	12.272	3.890	NA	1.637	58545.00	68691.82	60556.65	63553.07	112948.85	0.730	0.751	73525.86	67883.91	81973.27	205983.8	0.924	0.945	0.454	0.054	7.822	0.330	0.343	0.327	interpolated	benchmark	market	no	NA	NA	0.831	0.160	0.090	0.074	-0.206	0.051	0.327	0.421	0.350	0.473	0.464	0.407
GTM-2003	Guatemala	GTM	2003	Quetzal	63583.77	66275.41	12.573	4.029	NA	1.630	61206.75	71559.89	62545.62	66160.77	122840.91	0.720	0.739	75386.65	70127.82	84049.51	212495.2	0.924	0.945	0.454	0.052	7.941	0.337	0.350	0.331	interpolated	benchmark	market	no	NA	NA	0.838	0.156	0.087	0.077	-0.201	0.042	0.334	0.430	0.364	0.515	0.505	0.410
GTM-2004	Guatemala	GTM	2004	Quetzal	66131.61	69108.45	12.878	4.003	NA	1.623	63706.59	74806.21	64977.05	69019.59	136110.94	0.722	0.738	77762.90	72080.09	86489.88	218599.4	0.943	0.962	0.448	0.051	7.946	0.355	0.369	0.347	interpolated	benchmark	market	no	NA	81.111	0.844	0.161	0.079	0.078	-0.214	0.052	0.352	0.450	0.384	0.547	0.529	0.421
GTM-2005	Guatemala	GTM	2005	Quetzal	68825.27	72399.19	13.184	4.241	NA	1.616	68320.18	79756.32	68791.45	72216.68	153376.92	0.707	0.724	80298.05	74990.95	89195.77	225095.9	0.936	0.954	0.445	0.050	7.634	0.383	0.396	0.377	interpolated	benchmark	market	no	NA	78.889	0.866	0.158	0.080	0.135	-0.268	0.029	0.382	0.470	0.397	0.553	0.543	0.420
GTM-2006	Guatemala	GTM	2006	Quetzal	73486.25	76668.98	13.490	4.483	NA	1.647	72078.90	85189.21	72839.48	76602.49	173933.11	0.690	0.717	84617.91	78573.34	94445.38	234027.8	0.934	0.957	0.442	0.050	7.603	0.403	0.415	0.395	interpolated	benchmark	market	no	NA	80.000	0.860	0.171	0.081	0.072	-0.225	0.040	0.403	0.480	0.408	0.578	0.555	0.409
GTM-2007	Guatemala	GTM	2007	Quetzal	79439.30	82025.16	13.798	4.478	NA	1.679	77205.08	91696.30	78528.68	82104.99	192681.02	0.707	0.745	89952.32	83017.79	100097.27	243391.2	0.965	0.985	0.432	0.050	7.673	0.424	0.434	0.415	interpolated	benchmark	market	no	NA	78.889	0.857	0.176	0.083	0.131	-0.275	0.027	0.423	0.490	0.433	0.639	0.599	0.404
GTM-2008	Guatemala	GTM	2008	Quetzal	83265.55	85980.33	14.107	4.474	NA	1.711	82892.91	95164.66	82976.34	85649.05	209983.75	0.707	0.747	92903.74	87139.71	100861.81	251030.0	0.974	0.971	0.427	0.048	7.560	0.464	0.472	0.457	interpolated	benchmark	market	no	NA	82.222	0.877	0.143	0.091	0.128	-0.265	0.026	0.465	0.523	0.454	0.707	0.639	0.434
GTM-2009	Guatemala	GTM	2009	Quetzal	87864.48	88414.58	14.418	4.470	NA	1.737	84656.93	95068.25	87094.73	88634.62	223994.41	0.713	0.743	93392.59	88072.64	99219.42	255899.8	0.971	0.946	0.425	0.047	8.162	0.428	0.433	0.426	interpolated	benchmark	market	no	NA	85.556	0.855	0.117	0.101	0.122	-0.217	0.023	0.428	0.473	0.431	0.669	0.599	0.388
GTM-2010	Guatemala	GTM	2010	Quetzal	92085.59	93170.68	14.732	4.347	NA	1.762	89748.67	101272.45	91646.23	93270.40	241053.61	0.711	0.745	96072.38	91514.48	103506.62	260478.3	0.992	0.980	0.424	0.047	8.058	0.445	0.451	0.443	interpolated	benchmark	market	no	NA	85.556	0.858	0.124	0.104	0.132	-0.243	0.025	0.445	0.500	0.444	0.687	0.611	0.399
GTM-2011	Guatemala	GTM	2011	Quetzal	98496.59	100070.86	15.049	4.464	NA	1.782	94919.23	109068.38	98496.59	100070.86	266095.22	0.709	0.741	100070.86	94919.24	109068.38	266095.2	1.000	1.000	0.416	0.045	7.785	0.479	0.484	0.476	benchmark	benchmark	market	no	0.563	83.333	0.847	0.141	0.102	0.142	-0.260	0.028	0.480	0.513	0.478	0.714	0.638	0.405
GTM-2012	Guatemala	GTM	2012	Quetzal	101200.23	102466.37	15.369	5.068	NA	1.803	98274.92	112493.70	101122.35	101964.92	272282.81	0.661	0.701	103042.98	98166.99	112555.04	272057.2	0.960	0.962	0.416	0.044	7.834	0.494	0.498	0.494	extrapolated	benchmark	market	no	NA	80.000	0.859	0.139	0.105	0.144	-0.270	0.024	0.495	0.530	0.487	0.691	0.616	0.421
GTM-2013	Guatemala	GTM	2013	Quetzal	104637.66	105246.73	15.691	4.871	NA	1.824	102153.27	115864.62	104280.19	104663.09	281013.78	0.681	0.728	106852.91	101996.58	116153.33	277956.6	0.993	0.991	0.416	0.044	7.857	0.512	0.516	0.515	extrapolated	benchmark	market	no	NA	76.667	0.868	0.131	0.108	0.136	-0.271	0.027	0.513	0.550	0.502	0.705	0.618	0.423
GTM-2014	Guatemala	GTM	2014	Quetzal	109715.60	110703.16	16.015	5.011	NA	1.845	106532.52	120539.55	109468.74	110100.03	292397.53	0.686	0.724	111393.91	106132.74	120699.96	284343.5	1.004	0.998	0.416	0.045	7.732	0.533	0.537	0.534	extrapolated	benchmark	market	no	NA	68.889	0.859	0.127	0.109	0.140	-0.259	0.024	0.533	0.569	0.531	0.706	0.640	0.422

2- Construya una función que le permita elegir todas las variables de la categoría “Labor detail”, muestre su uso para los datos de Argentina.

calculo_labor_detail <- function(iso_pais,anio_inicio,anio_final) {
  enquo(iso_pais)->iso_pais
pwt9.0 %>% filter(isocode==!!iso_pais,
                    year>=anio_inicio,
                    year<=anio_final) %>%
    select(isocode,year,emp, avh, hc, labsh)-> country_labor_detail
return(country_labor_detail)
}
calculo_labor_detail(iso_pais = "ARG",1950,2014) %>%
 kable(caption = "Función consulta Labor detail para: Argentina 1990-2014",
 digits = 3,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Función consulta Labor detail para: Argentina 1990-2014

	isocode	year	emp	avh	hc	labsh
ARG-1950	ARG	1950	6.547	2034.000	1.817	0.534
ARG-1951	ARG	1951	6.650	2037.867	1.831	0.534
ARG-1952	ARG	1952	6.755	2041.741	1.845	0.534
ARG-1953	ARG	1953	6.862	2045.622	1.860	0.534
ARG-1954	ARG	1954	6.970	2049.511	1.874	0.534
ARG-1955	ARG	1955	7.081	2053.407	1.889	0.534
ARG-1956	ARG	1956	7.176	2057.311	1.902	0.534
ARG-1957	ARG	1957	7.273	2061.222	1.915	0.534
ARG-1958	ARG	1958	7.371	2065.141	1.928	0.534
ARG-1959	ARG	1959	7.470	2069.067	1.941	0.534
ARG-1960	ARG	1960	7.571	2073.000	1.954	0.534
ARG-1961	ARG	1961	7.667	2066.201	1.965	0.534
ARG-1962	ARG	1962	7.765	2059.423	1.976	0.534
ARG-1963	ARG	1963	7.863	2052.668	1.987	0.534
ARG-1964	ARG	1964	7.963	2045.936	1.998	0.534
ARG-1965	ARG	1965	8.064	2039.225	2.010	0.534
ARG-1966	ARG	1966	8.163	2032.536	2.023	0.534
ARG-1967	ARG	1967	8.263	2025.869	2.036	0.534
ARG-1968	ARG	1968	8.364	2019.224	2.049	0.534
ARG-1969	ARG	1969	8.467	2012.601	2.062	0.534
ARG-1970	ARG	1970	8.571	2006.000	2.075	0.534
ARG-1971	ARG	1971	8.650	2002.661	2.096	0.534
ARG-1972	ARG	1972	8.733	1999.328	2.118	0.534
ARG-1973	ARG	1973	8.816	1996.000	2.140	0.534
ARG-1974	ARG	1974	9.135	1992.842	2.162	0.534
ARG-1975	ARG	1975	9.189	1989.689	2.184	0.534
ARG-1976	ARG	1976	9.183	1986.542	2.197	0.534
ARG-1977	ARG	1977	9.414	1983.399	2.210	0.534
ARG-1978	ARG	1978	9.481	1980.261	2.223	0.534
ARG-1979	ARG	1979	9.628	1977.128	2.237	0.534
ARG-1980	ARG	1980	9.641	1974.000	2.250	0.534
ARG-1981	ARG	1981	9.651	1961.230	2.283	0.534
ARG-1982	ARG	1982	9.795	1948.543	2.317	0.534
ARG-1983	ARG	1983	10.102	1935.937	2.351	0.534
ARG-1984	ARG	1984	10.346	1923.414	2.385	0.534
ARG-1985	ARG	1985	10.432	1910.971	2.421	0.534
ARG-1986	ARG	1986	10.740	1898.609	2.442	0.534
ARG-1987	ARG	1987	10.961	1886.327	2.463	0.534
ARG-1988	ARG	1988	11.177	1874.124	2.485	0.534
ARG-1989	ARG	1989	11.275	1862.000	2.507	0.534
ARG-1990	ARG	1990	11.587	1850.000	2.529	0.534
ARG-1991	ARG	1991	11.953	1837.961	2.553	0.534
ARG-1992	ARG	1992	12.147	1826.000	2.571	0.534
ARG-1993	ARG	1993	12.070	1850.338	2.587	0.534
ARG-1994	ARG	1994	12.076	1875.000	2.603	0.524
ARG-1995	ARG	1995	11.505	1897.217	2.620	0.473
ARG-1996	ARG	1996	11.787	1846.067	2.627	0.438
ARG-1997	ARG	1997	12.359	1917.293	2.635	0.419
ARG-1998	ARG	1998	12.904	1903.000	2.642	0.433
ARG-1999	ARG	1999	12.955	1893.249	2.650	0.461
ARG-2000	ARG	2000	13.094	1861.003	2.657	0.458
ARG-2001	ARG	2001	13.046	1803.424	2.683	0.469
ARG-2002	ARG	2002	13.007	1610.573	2.709	0.366
ARG-2003	ARG	2003	13.727	1719.393	2.735	0.356
ARG-2004	ARG	2004	14.669	1739.675	2.762	0.375
ARG-2005	ARG	2005	15.337	1755.349	2.789	0.401
ARG-2006	ARG	2006	15.856	1809.428	2.797	0.429
ARG-2007	ARG	2007	16.441	1816.903	2.805	0.433
ARG-2008	ARG	2008	16.842	1835.884	2.813	0.433
ARG-2009	ARG	2009	16.994	1736.907	2.822	0.433
ARG-2010	ARG	2010	17.491	1728.729	2.830	0.433
ARG-2011	ARG	2011	17.879	1762.291	2.859	0.433
ARG-2012	ARG	2012	18.066	1788.986	2.887	0.433
ARG-2013	ARG	2013	18.257	1776.659	2.916	0.433
ARG-2014	ARG	2014	18.098	1776.659	2.946	0.433

3- Use las funciones creadas en 1 y 2, para generar 2 dataframes, que muestren los datos de “EE.UU” y “Canadá” para el periodo 2000-2014.

#Ejecutamos la funcion 1.
funcion_consulta_pais_2(iso_pais = c("USA","CAN"),2000,2014)->EEUU_CAN_Dataframe
EEUU_CAN_Dataframe%>%
 kable(caption = "Consultando para: EE.UU y Canada 2000-2014",
 digits = 1,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Consultando para: EE.UU y Canada 2000-2014

	country	isocode	year	currency	rgdpe	rgdpo	pop	emp	avh	hc	ccon	cda	cgdpe	cgdpo	ck	ctfp	cwtfp	rgdpna	rconna	rdana	rkna	rtfpna	rwtfpna	labsh	delta	xr	pl_con	pl_da	pl_gdpo	i_cig	i_xm	i_xr	i_outlier	cor_exp	statcap	csh_c	csh_i	csh_g	csh_x	csh_m	csh_r	pl_c	pl_i	pl_g	pl_x	pl_m	pl_k
CAN-2001	Canada	CAN	2001	Canadian Dollar	1166188	1119308	31.0	15.1	1768.0	3.5	814203.9	1079932	1145022	1144414	3268334	0.9	0.8	1190649	782785.5	1041029	3905941	1.0	0.9	0.6	0.0	1.5	0.7	0.6	0.6	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.4	-0.4	0	0.6	0.5	0.8	0.5	0.5	0.6
CAN-2003	Canada	CAN	2003	Canadian Dollar	1211094	1184269	31.6	15.8	1732.1	3.5	858441.9	1148489	1194611	1200543	3349291	0.9	0.8	1247575	832796.8	1119539	4151862	1.0	0.9	0.6	0.0	1.4	0.8	0.7	0.7	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.4	-0.3	0	0.7	0.6	1.0	0.6	0.6	0.8
CAN-2005	Canada	CAN	2005	Canadian Dollar	1311424	1323181	32.3	16.4	1739.2	3.6	918976.9	1263380	1315081	1326233	3865556	0.9	0.8	1327435	882079.1	1221829	4462552	1.0	1.0	0.6	0.0	1.2	0.9	0.9	0.9	benchmark	benchmark	market	no	0.9	NA	0.5	0.3	0.1	0.4	-0.4	0	0.9	0.8	1.1	0.6	0.6	0.9
CAN-2007	Canada	CAN	2007	Canadian Dollar	1376870	1384391	33.0	17.3	1724.7	3.6	969776.7	1342214	1370408	1395106	4445640	0.9	0.8	1389595	950916.3	1319552	4812567	1.0	1.0	0.6	0.0	1.1	1.1	1.1	1.0	interpolated	benchmark	market	no	NA	NA	0.5	0.3	0.2	0.4	-0.4	0	1.1	0.9	1.3	0.7	0.7	1.1
CAN-2009	Canada	CAN	2009	Canadian Dollar	1310934	1304883	33.7	17.4	1678.5	3.6	1000717.9	1325223	1306457	1323073	4794360	0.8	0.8	1367808	994270.1	1323141	5106391	1.0	1.0	0.6	0.0	1.1	1.1	1.0	1.0	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.3	-0.3	0	1.0	0.9	1.3	0.7	0.7	1.0
CAN-2011	Canada	CAN	2011	Canadian Dollar	1423920	1455816	34.5	18.1	1683.6	3.7	1045868.8	1440603	1423920	1455816	5427466	0.8	0.8	1455816	1045868.8	1440603	5427466	1.0	1.0	0.6	0.0	1.0	1.3	1.3	1.2	benchmark	benchmark	market	no	0.8	NA	0.5	0.3	0.2	0.4	-0.4	0	1.3	1.1	1.5	0.7	0.7	1.2
CAN-2013	Canada	CAN	2013	Canadian Dollar	1478439	1493624	35.2	18.7	1682.7	3.7	1086339.8	1488701	1465085	1472069	5828469	0.8	0.8	1513537	1084256.5	1500049	5779532	1.0	1.0	0.6	0.0	1.0	1.3	1.3	1.2	extrapolated	benchmark	market	no	NA	NA	0.6	0.3	0.2	0.4	-0.4	0	1.2	1.1	1.5	0.7	0.7	1.1
USA-2000	United States of America	USA	2000	US Dollar	13222419	13031820	282.9	139.3	1848.1	3.6	9977582.0	13511612	13035321	12983206	35997032	1.0	1.0	12975535	10500206.0	13647352	38439588	0.9	0.9	0.6	0.1	1.0	0.8	0.8	0.8	interpolated	benchmark	market	no	NA	NA	0.7	0.3	0.1	0.1	-0.2	0	0.8	0.7	1.2	0.6	0.6	0.8
USA-2002	United States of America	USA	2002	US Dollar	13591523	13309916	288.5	139.1	1805.5	3.6	10524779.0	14027745	13503168	13339370	38467564	1.0	1.0	13336194	11088529.0	14123900	40679832	0.9	1.0	0.6	0.1	1.0	0.9	0.8	0.8	benchmark	benchmark	market	no	NA	NA	0.7	0.3	0.1	0.1	-0.2	0	0.8	0.7	1.2	0.6	0.6	0.8
USA-2004	United States of America	USA	2004	US Dollar	14499944	14204685	293.5	141.6	1783.4	3.6	11251801.0	15090846	14366189	14232334	42071616	1.0	1.0	14229557	11796878.0	15181932	43024076	1.0	1.0	0.6	0.0	1.0	0.9	0.9	0.9	interpolated	benchmark	market	no	NA	NA	0.7	0.3	0.1	0.1	-0.2	0	0.8	0.7	1.3	0.6	0.7	0.9
USA-2006	United States of America	USA	2006	US Dollar	15353601	15083465	298.9	146.6	1778.5	3.6	12126527.0	16170304	15318001	15099868	47891040	1.0	1.0	15097712	12476968.0	16121374	45671956	1.0	1.0	0.6	0.0	1.0	0.9	0.9	0.9	interpolated	benchmark	market	no	NA	NA	0.7	0.3	0.1	0.1	-0.2	0	0.9	0.8	1.3	0.7	0.7	0.9
USA-2008	United States of America	USA	2008	US Dollar	15357469	15305872	304.5	147.5	1761.3	3.7	12569281.0	16125585	15370500	15321926	50006724	1.0	1.0	15321422	12759836.0	16086510	47779436	1.0	1.0	0.6	0.0	1.0	1.0	1.0	1.0	interpolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.2	0	0.9	0.9	1.3	0.8	0.8	1.0
USA-2010	United States of America	USA	2010	US Dollar	15368666	15250698	309.9	141.3	1738.0	3.7	12764841.0	15842214	15317448	15273702	48876336	1.0	1.0	15273331	12883714.0	15924426	48728140	1.0	1.0	0.6	0.0	1.0	1.0	1.0	1.0	interpolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.2	0	0.9	0.9	1.3	0.7	0.8	1.0
USA-2012	United States of America	USA	2012	US Dollar	15976742	15899255	314.8	144.9	1753.7	3.7	13206454.0	16505245	15946878	15863845	50020716	1.0	1.0	15863049	13182059.0	16509182	49960600	1.0	1.0	0.6	0.0	1.0	1.0	1.0	1.0	extrapolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.2	0	1.0	0.9	1.3	0.8	0.8	1.0
USA-2014	United States of America	USA	2014	US Dollar	16704698	16598099	319.4	148.5	1764.6	3.7	13685949.0	17113208	16605887	16490883	52849892	1.0	1.0	16490192	13585164.0	17137356	51190644	1.0	1.0	0.6	0.0	1.0	1.1	1.0	1.1	extrapolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.2	0	1.0	1.0	1.4	0.8	0.8	1.1

#Ejecutamos la funcion 2.
calculo_labor_detail(iso_pais = c("USA","CAN"),2000,2014)->EEUU_CAN_Dataframe_2
EEUU_CAN_Dataframe_2%>%
 kable(caption = "Consultando para: EE.UU y Canada 2000-2014",
 digits = 1,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Consultando para: EE.UU y Canada 2000-2014

	isocode	year	emp	avh	hc	labsh
CAN-2001	CAN	2001	15.1	1768.0	3.5	0.6
CAN-2003	CAN	2003	15.8	1732.1	3.5	0.6
CAN-2005	CAN	2005	16.4	1739.2	3.6	0.6
CAN-2007	CAN	2007	17.3	1724.7	3.6	0.6
CAN-2009	CAN	2009	17.4	1678.5	3.6	0.6
CAN-2011	CAN	2011	18.1	1683.6	3.7	0.6
CAN-2013	CAN	2013	18.7	1682.7	3.7	0.6
USA-2000	USA	2000	139.3	1848.1	3.6	0.6
USA-2002	USA	2002	139.1	1805.5	3.6	0.6
USA-2004	USA	2004	141.6	1783.4	3.6	0.6
USA-2006	USA	2006	146.6	1778.5	3.6	0.6
USA-2008	USA	2008	147.5	1761.3	3.7	0.6
USA-2010	USA	2010	141.3	1738.0	3.7	0.6
USA-2012	USA	2012	144.9	1753.7	3.7	0.6
USA-2014	USA	2014	148.5	1764.6	3.7	0.6

CLAVE 3

PARTE 2

1- Construya una función que le permita elegir el país y filtrar para un periodo(inicio,final), muestre su uso filtrando los datos para Honduras, en el periodo de 1990-2014.

library(pwt9)
library(dplyr)
library(kableExtra) 
data("pwt9.0") 
options(scipen =999999)

funcion_consulta_pais_3<-function(iso_pais,anio_inicio,anio_final){     
  enquo(iso_pais)->iso_pais 
pwt9.0 %>% filter(isocode==!!iso_pais, 
                  year>=anio_inicio, 
                  year<=anio_final)->df_3
return(df_3) 
}

funcion_consulta_pais_3(iso_pais ="HND",1990,2014) %>% 
  kable(caption = "Función consulta paises, SLV 1990-2014", 
        digits = 3, align ="l") %>%
  kable_styling(bootstrap_options ="striped",
                full_width =TRUE
)

Función consulta paises, SLV 1990-2014

	country	isocode	year	currency	rgdpe	rgdpo	pop	emp	avh	hc	ccon	cda	cgdpe	cgdpo	ck	ctfp	cwtfp	rgdpna	rconna	rdana	rkna	rtfpna	rwtfpna	labsh	delta	xr	pl_con	pl_da	pl_gdpo	i_cig	i_xm	i_xr	i_outlier	cor_exp	statcap	csh_c	csh_i	csh_g	csh_x	csh_m	csh_r	pl_c	pl_i	pl_g	pl_x	pl_m	pl_k
HND-1990	Honduras	HND	1990	Lempira	13869.68	14479.95	4.903	1.213	NA	1.768	12349.56	14292.89	14019.55	14777.81	24019.17	0.627	0.599	15670.49	14036.91	16844.10	46727.57	1.248	1.151	0.579	0.048	4.112	0.238	0.259	0.246	interpolated	benchmark	market	no	NA	NA	0.729	0.132	0.107	0.074	-0.128	0.087	0.226	0.396	0.319	0.509	0.498	0.395
HND-1991	Honduras	HND	1991	Lempira	14668.76	15217.25	5.041	1.530	NA	1.779	12721.95	15095.52	14801.82	15593.70	24835.76	0.566	0.545	16180.10	14378.00	17783.92	48069.19	1.113	1.049	0.579	0.048	5.317	0.228	0.247	0.235	interpolated	benchmark	market	no	NA	NA	0.727	0.152	0.089	0.074	-0.117	0.075	0.219	0.350	0.306	0.537	0.530	0.370
HND-1992	Honduras	HND	1992	Lempira	15327.71	15702.40	5.180	1.667	NA	1.790	13162.22	15913.10	15452.53	15956.85	26166.61	0.519	0.514	17090.11	14913.27	18787.75	50292.81	1.097	1.034	0.579	0.049	5.498	0.245	0.264	0.256	interpolated	benchmark	market	no	NA	NA	0.728	0.172	0.097	0.093	-0.138	0.048	0.234	0.354	0.325	0.498	0.478	0.380
HND-1993	Honduras	HND	1993	Lempira	15933.56	17007.75	5.318	1.717	NA	1.801	13556.20	17219.01	16058.67	17298.61	28825.96	0.530	0.520	18154.83	15235.90	20400.85	53997.58	1.102	1.062	0.579	0.051	6.472	0.235	0.260	0.242	interpolated	benchmark	market	no	NA	NA	0.704	0.212	0.079	0.077	-0.153	0.081	0.223	0.353	0.345	0.499	0.493	0.360
HND-1994	Honduras	HND	1994	Lempira	16221.66	17431.77	5.455	1.775	NA	1.813	13626.76	17519.94	16247.20	17766.09	31565.97	0.510	0.495	17918.23	15181.68	20793.20	57415.96	1.030	1.026	0.579	0.053	8.409	0.220	0.252	0.230	interpolated	benchmark	market	no	NA	NA	0.694	0.219	0.073	0.068	-0.152	0.098	0.209	0.364	0.325	0.508	0.495	0.334
HND-1995	Honduras	HND	1995	Lempira	17476.45	19391.93	5.591	1.821	NA	1.824	13971.42	17967.27	17503.07	19796.22	33959.80	0.541	0.485	18649.27	15343.45	21133.80	59646.99	1.030	1.002	0.579	0.054	9.471	0.249	0.270	0.239	interpolated	benchmark	market	no	NA	NA	0.644	0.202	0.062	0.063	-0.170	0.200	0.236	0.344	0.384	0.530	0.512	0.371
HND-1996	Honduras	HND	1996	Lempira	17991.68	18534.55	5.725	1.969	NA	1.836	14862.28	18612.00	17993.62	18919.16	36097.18	0.473	0.459	19316.62	16146.38	21565.41	62041.05	1.001	0.959	0.579	0.056	11.705	0.245	0.271	0.257	interpolated	benchmark	market	no	NA	NA	0.720	0.198	0.066	0.125	-0.182	0.073	0.231	0.372	0.398	0.556	0.534	0.352
HND-1997	Honduras	HND	1997	Lempira	18783.43	19283.00	5.856	2.066	NA	1.847	15261.00	19375.77	18662.25	19602.26	38919.98	0.453	0.442	20281.24	16564.65	22439.02	65095.36	0.994	0.944	0.579	0.058	13.003	0.274	0.301	0.287	interpolated	benchmark	market	no	NA	NA	0.714	0.210	0.065	0.139	-0.214	0.086	0.260	0.405	0.419	0.530	0.512	0.365
HND-1998	Honduras	HND	1998	Lempira	19437.26	19877.25	5.986	2.130	NA	1.859	16084.09	20327.30	19169.84	20236.38	42338.37	0.430	0.424	20869.72	17542.46	23514.27	68522.87	0.976	0.944	0.579	0.060	13.385	0.303	0.327	0.310	interpolated	benchmark	market	no	NA	NA	0.722	0.210	0.073	0.155	-0.259	0.099	0.287	0.421	0.459	0.489	0.484	0.392
HND-1999	Honduras	HND	1999	Lempira	18722.69	19555.42	6.115	2.279	NA	1.870	16175.77	20880.68	18457.55	19883.22	46072.06	0.383	0.391	20475.37	17648.50	24128.66	72088.17	0.896	0.906	0.579	0.061	14.213	0.325	0.351	0.325	interpolated	benchmark	market	no	NA	60.556	0.731	0.237	0.082	0.122	-0.274	0.102	0.308	0.439	0.478	0.481	0.491	0.388
HND-2000	Honduras	HND	2000	Lempira	20014.32	21004.32	6.243	2.277	NA	1.882	17440.45	22230.78	19769.88	21097.94	49552.57	0.386	0.390	21652.33	19076.11	25351.34	74802.02	0.931	0.935	0.579	0.060	14.839	0.347	0.364	0.341	interpolated	benchmark	market	no	NA	NA	0.736	0.227	0.091	0.110	-0.235	0.071	0.328	0.424	0.502	0.463	0.500	0.393
HND-2001	Honduras	HND	2001	Lempira	20637.62	21337.64	6.371	2.285	NA	1.900	18379.90	23177.14	20478.18	21473.39	52978.77	0.377	0.390	22241.96	19999.78	26027.96	77193.24	0.944	0.948	0.591	0.060	15.474	0.363	0.374	0.356	interpolated	benchmark	market	no	NA	NA	0.760	0.223	0.096	0.140	-0.266	0.046	0.340	0.415	0.548	0.441	0.472	0.387
HND-2002	Honduras	HND	2002	Lempira	21429.86	22322.82	6.499	2.310	NA	1.918	19132.07	23977.57	21306.53	22633.90	56023.19	0.383	0.386	23077.00	20740.80	26554.17	79013.09	0.964	0.952	0.598	0.060	16.433	0.363	0.369	0.347	interpolated	benchmark	market	no	NA	NA	0.753	0.214	0.092	0.094	-0.271	0.118	0.338	0.394	0.565	0.453	0.468	0.373
HND-2003	Honduras	HND	2003	Lempira	22293.72	23442.72	6.626	2.358	NA	1.936	20103.34	25232.91	22122.40	23866.67	59671.42	0.384	0.386	24126.32	21692.98	27731.18	81101.34	0.988	0.974	0.605	0.060	17.345	0.364	0.372	0.345	interpolated	benchmark	market	no	NA	NA	0.748	0.215	0.094	0.086	-0.263	0.121	0.341	0.406	0.545	0.485	0.500	0.377
HND-2004	Honduras	HND	2004	Lempira	23503.39	24886.89	6.753	2.381	NA	1.954	21223.06	27632.29	23295.61	25364.89	65749.49	0.390	0.401	25629.94	22787.18	30171.69	84672.58	1.019	1.029	0.597	0.061	18.206	0.372	0.381	0.350	interpolated	benchmark	market	no	NA	63.889	0.742	0.253	0.095	0.090	-0.274	0.095	0.349	0.411	0.552	0.521	0.529	0.368
HND-2005	Honduras	HND	2005	Lempira	24863.05	27339.28	6.880	2.453	NA	1.972	23171.71	29687.92	25057.70	27758.67	72955.40	0.409	0.405	27180.79	24338.38	31628.40	87856.12	1.042	1.040	0.590	0.061	18.832	0.383	0.389	0.351	interpolated	benchmark	market	no	NA	63.333	0.734	0.235	0.100	0.089	-0.294	0.135	0.361	0.414	0.544	0.526	0.542	0.353
HND-2006	Honduras	HND	2006	Lempira	26591.88	28317.32	7.007	2.637	NA	1.990	25053.55	32155.18	26569.55	28826.40	81215.07	0.393	0.410	28965.75	26253.87	34069.19	91934.22	1.039	1.048	0.585	0.062	18.895	0.404	0.411	0.379	interpolated	benchmark	market	no	NA	63.333	0.768	0.246	0.102	0.118	-0.302	0.068	0.383	0.436	0.559	0.554	0.566	0.358
HND-2007	Honduras	HND	2007	Lempira	28196.94	30212.58	7.134	2.752	NA	2.009	26953.74	35926.29	28055.89	30818.34	89601.12	0.391	0.430	30758.23	28137.40	37910.04	98000.57	1.044	1.104	0.593	0.063	18.895	0.433	0.441	0.401	interpolated	benchmark	market	no	NA	70.000	0.766	0.291	0.109	0.128	-0.348	0.054	0.408	0.464	0.610	0.608	0.610	0.371
HND-2008	Honduras	HND	2008	Lempira	28689.72	29158.39	7.259	2.778	NA	2.028	28240.20	38256.50	28743.01	29235.60	97798.84	0.355	0.442	32059.88	29045.71	39696.93	104314.83	1.053	1.119	0.594	0.062	18.904	0.477	0.483	0.475	interpolated	benchmark	market	no	NA	73.333	0.843	0.343	0.123	0.316	-0.481	-0.144	0.450	0.500	0.660	0.708	0.650	0.398
HND-2009	Honduras	HND	2009	Lempira	29242.94	29286.39	7.383	2.891	NA	2.047	28587.59	34253.79	29066.95	29677.80	100695.90	0.349	0.391	31280.22	29424.54	35252.21	105943.45	1.003	0.970	0.599	0.060	18.895	0.496	0.502	0.492	interpolated	benchmark	market	no	NA	77.778	0.833	0.191	0.130	0.125	-0.329	0.050	0.463	0.530	0.705	0.700	0.607	0.418
HND-2010	Honduras	HND	2010	Lempira	30846.39	31120.90	7.504	2.940	NA	2.066	29819.84	36243.63	30734.73	31326.93	104274.56	0.347	0.387	32447.37	30233.08	36788.32	107767.67	1.014	0.986	0.608	0.059	18.895	0.510	0.515	0.506	interpolated	benchmark	market	no	NA	77.778	0.828	0.205	0.124	0.145	-0.362	0.060	0.477	0.539	0.730	0.682	0.607	0.430
HND-2011	Honduras	HND	2011	Lempira	32806.54	33691.91	7.621	3.052	NA	2.104	31070.36	39269.93	32806.54	33691.91	110959.42	0.347	0.388	33691.91	31070.36	39269.93	110959.42	1.000	1.000	0.611	0.059	18.917	0.534	0.540	0.526	benchmark	benchmark	market	no	0.609	77.778	0.807	0.243	0.115	0.145	-0.396	0.086	0.505	0.562	0.736	0.724	0.640	0.451
HND-2012	Honduras	HND	2012	Lempira	33772.98	34601.96	7.736	3.165	NA	2.143	32356.33	40233.31	33701.14	34306.44	114260.53	0.334	0.376	35082.96	32295.15	40251.67	114391.16	0.996	0.980	0.618	0.059	19.502	0.543	0.550	0.540	extrapolated	benchmark	market	no	NA	76.000	0.828	0.230	0.115	0.191	-0.383	0.019	0.513	0.578	0.762	0.718	0.659	0.453
HND-2013	Honduras	HND	2013	Lempira	33759.91	33670.28	7.849	3.277	NA	2.183	33565.68	40386.88	33537.50	33307.57	118671.20	0.310	0.363	36062.30	33478.72	40477.25	117494.66	0.979	0.942	0.618	0.058	20.341	0.544	0.552	0.556	extrapolated	benchmark	market	no	NA	62.222	0.885	0.205	0.122	0.322	-0.440	-0.095	0.514	0.591	0.761	0.696	0.648	0.441
HND-2014	Honduras	HND	2014	Lempira	35219.24	34835.65	7.962	3.381	NA	2.224	34384.08	41614.69	35008.41	34377.60	123703.28	0.304	0.355	37174.90	34161.48	41649.40	120378.56	0.967	0.930	0.618	0.057	21.009	0.549	0.557	0.567	extrapolated	benchmark	market	no	NA	73.333	0.883	0.210	0.117	0.340	-0.475	-0.075	0.521	0.595	0.761	0.697	0.634	0.437

2- Construya una función que le permita elegir todas las variables de la categoría “Capital detail”, muestre su uso para los datos de Panamá

calculo_capital_detail <- function(iso_pais,anio_inicio,anio_final) {
  enquo(iso_pais)->iso_pais
pwt9.0 %>% filter(isocode==!!iso_pais,
                    year>=anio_inicio,
                    year<=anio_final) %>%
    select(isocode, year, ck, rkna, pl_k)-> country_capital_detail
return(country_capital_detail)
}
calculo_capital_detail(iso_pais ="PAN", 1950,2014) %>%
 kable(caption = "Función consulta Capital detail, Panama 1990-2014",
 digits = 1,align = "l") %>%
kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Función consulta Capital detail, Panama 1990-2014

	isocode	year	ck	rkna	pl_k
PAN-1950	PAN	1950	3974.4	7910.7	0.2
PAN-1951	PAN	1951	4069.1	7852.9	0.2
PAN-1952	PAN	1952	4146.3	7819.0	0.2
PAN-1953	PAN	1953	4194.0	7919.3	0.2
PAN-1954	PAN	1954	4124.0	7955.6	0.2
PAN-1955	PAN	1955	4161.5	8047.9	0.2
PAN-1956	PAN	1956	4363.7	8225.0	0.2
PAN-1957	PAN	1957	4487.4	8409.0	0.2
PAN-1958	PAN	1958	4531.0	8648.3	0.2
PAN-1959	PAN	1959	4688.3	8946.8	0.2
PAN-1960	PAN	1960	4690.7	9182.7	0.2
PAN-1961	PAN	1961	4875.8	9531.8	0.2
PAN-1962	PAN	1962	5083.9	9964.5	0.2
PAN-1963	PAN	1963	5296.1	10468.6	0.2
PAN-1964	PAN	1964	5434.3	10876.9	0.2
PAN-1965	PAN	1965	5712.3	11372.3	0.2
PAN-1966	PAN	1966	6162.0	12153.6	0.2
PAN-1967	PAN	1967	6605.5	12955.6	0.2
PAN-1968	PAN	1968	7103.5	13884.0	0.2
PAN-1969	PAN	1969	7759.3	14962.7	0.2
PAN-1970	PAN	1970	8744.9	16607.6	0.2
PAN-1971	PAN	1971	9853.1	18485.3	0.2
PAN-1972	PAN	1972	11258.1	20871.1	0.2
PAN-1973	PAN	1973	12697.5	23114.2	0.2
PAN-1974	PAN	1974	14108.2	24912.7	0.3
PAN-1975	PAN	1975	15473.7	26847.1	0.3
PAN-1976	PAN	1976	16559.0	28760.0	0.3
PAN-1977	PAN	1977	17266.5	29532.2	0.3
PAN-1978	PAN	1978	18411.5	30826.6	0.4
PAN-1979	PAN	1979	19512.7	32049.5	0.4
PAN-1980	PAN	1980	20876.9	33797.9	0.4
PAN-1981	PAN	1981	22641.3	36217.0	0.4
PAN-1982	PAN	1982	24276.0	38632.2	0.4
PAN-1983	PAN	1983	24367.4	39796.4	0.5
PAN-1984	PAN	1984	24464.8	40627.0	0.4
PAN-1985	PAN	1985	24666.5	41321.0	0.5
PAN-1986	PAN	1986	25712.5	42623.7	0.5
PAN-1987	PAN	1987	26721.9	44186.4	0.5
PAN-1988	PAN	1988	26434.9	43668.6	0.4
PAN-1989	PAN	1989	25723.7	42711.3	0.5
PAN-1990	PAN	1990	25448.7	42280.0	0.5
PAN-1991	PAN	1991	25695.9	43114.4	0.5
PAN-1992	PAN	1992	26580.9	44983.6	0.5
PAN-1993	PAN	1993	28817.3	48241.7	0.5
PAN-1994	PAN	1994	31240.9	51560.6	0.5
PAN-1995	PAN	1995	34024.9	55079.7	0.5
PAN-1996	PAN	1996	36206.4	58254.4	0.5
PAN-1997	PAN	1997	39246.6	61684.6	0.5
PAN-1998	PAN	1998	43127.2	65850.3	0.5
PAN-1999	PAN	1999	47489.8	70507.2	0.5
PAN-2000	PAN	2000	51416.7	74266.6	0.5
PAN-2001	PAN	2001	53947.7	75946.8	0.4
PAN-2002	PAN	2002	56263.8	77322.8	0.4
PAN-2003	PAN	2003	60077.4	79968.2	0.4
PAN-2004	PAN	2004	65767.7	83185.1	0.4
PAN-2005	PAN	2005	73176.2	86754.7	0.4
PAN-2006	PAN	2006	81943.7	91417.5	0.4
PAN-2007	PAN	2007	92301.1	99499.9	0.5
PAN-2008	PAN	2008	103622.5	109266.6	0.5
PAN-2009	PAN	2009	112844.9	117965.0	0.5
PAN-2010	PAN	2010	124656.5	128348.8	0.5
PAN-2011	PAN	2011	142056.7	142056.7	0.6
PAN-2012	PAN	2012	158524.4	159050.1	0.6
PAN-2013	PAN	2013	179119.1	178155.9	0.5
PAN-2014	PAN	2014	201345.0	197037.3	0.5

3- Use las funciones creadas en 1 y 2, para generar 2 dataframes, que muestren los datos de “EE.UU” y “Reino Unido” para el periodo 1990-2000

# Ejecutamos la funcion 1.
funcion_consulta_pais_3(iso_pais = c("USA","GBR"),1990,2000)-> USA_GBR_Dataframe
USA_GBR_Dataframe%>%
 kable(caption = "Consultando para: EE.UU y Reino unido 1990-2000",
 digits = 1,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Consultando para: EE.UU y Reino unido 1990-2000

	country	isocode	year	currency	rgdpe	rgdpo	pop	emp	avh	hc	ccon	cda	cgdpe	cgdpo	ck	ctfp	cwtfp	rgdpna	rconna	rdana	rkna	rtfpna	rwtfpna	labsh	delta	xr	pl_con	pl_da	pl_gdpo	i_cig	i_xm	i_xr	i_outlier	cor_exp	statcap	csh_c	csh_i	csh_g	csh_x	csh_m	csh_r	pl_c	pl_i	pl_g	pl_x	pl_m	pl_k
GBR-1990	United Kingdom	GBR	1990	Pound Sterling	1417085	1385562	57.1	26.7	1757.4	3.2	1089023	1383493	1389299	1359320	3581698	0.9	0.9	1454251	1151596	1441845	6776786	0.8	0.8	0.6	0.0	0.6	0.8	0.8	0.8	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.2	-0.3	0	0.7	0.8	0.9	0.6	0.6	1.1
GBR-1992	United Kingdom	GBR	1992	Pound Sterling	1414993	1376120	57.4	25.3	1710.7	3.3	1079084	1364559	1386354	1355717	3798598	0.8	0.8	1442380	1157180	1430968	6966938	0.9	0.8	0.6	0.0	0.6	0.9	0.9	0.9	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.2	-0.3	0	0.8	0.7	1.0	0.6	0.6	1.0
GBR-1994	United Kingdom	GBR	1994	Pound Sterling	1519652	1478347	57.7	25.4	1718.1	3.3	1143430	1462102	1480134	1454296	4275514	0.8	0.8	1539957	1230659	1542677	7189067	0.9	0.8	0.6	0.0	0.7	0.8	0.8	0.8	interpolated	benchmark	market	no	NA	NA	0.6	0.2	0.2	0.2	-0.3	0	0.8	0.7	1.0	0.6	0.6	0.7
GBR-1996	United Kingdom	GBR	1996	Pound Sterling	1674593	1641439	58.1	25.9	1728.0	3.4	1243814	1616862	1620570	1603619	4926870	0.8	0.8	1620910	1298540	1675014	7519430	0.9	0.9	0.6	0.0	0.6	0.8	0.8	0.8	benchmark	benchmark	market	no	0.9	NA	0.6	0.2	0.1	0.2	-0.3	0	0.8	0.7	1.0	0.7	0.6	0.8
GBR-1998	United Kingdom	GBR	1998	Pound Sterling	1888442	1813215	58.5	26.7	1720.5	3.4	1437450	1828209	1813438	1801130	5103451	0.9	0.9	1727567	1407718	1817333	7832531	0.9	0.9	0.6	0.0	0.6	0.9	0.8	0.9	benchmark	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.3	-0.3	0	0.8	0.8	1.0	0.6	0.6	0.9
GBR-2000	United Kingdom	GBR	2000	Pound Sterling	2088803	2024305	58.9	27.3	1699.1	3.5	1650633	2054763	2015176	2011111	5134820	0.9	0.9	1849012	1538370	1967642	8162493	1.0	1.0	0.6	0.0	0.7	0.8	0.8	0.8	benchmark	benchmark	market	no	NA	NA	0.7	0.2	0.2	0.3	-0.3	0	0.7	0.8	0.9	0.5	0.6	0.9
USA-1990	United States of America	USA	1990	US Dollar	9203227	9203558	252.8	123.4	1793.3	3.4	7180793	9379958	9259331	9259567	26453210	1.0	1.0	9241600	7644560	9454309	29208678	0.8	0.8	0.6	0.1	1.0	0.7	0.6	0.6	interpolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.1	0	0.6	0.6	1.0	0.6	0.6	0.6
USA-1992	United States of America	USA	1992	US Dollar	9530917	9509170	257.9	122.2	1773.5	3.5	7393262	9636033	9585170	9573914	26769574	1.0	1.0	9563208	7915272	9717433	30447546	0.8	0.8	0.6	0.1	1.0	0.7	0.7	0.7	interpolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.1	0	0.7	0.6	1.0	0.6	0.6	0.7
USA-1994	United States of America	USA	1994	US Dollar	10262589	10205495	263.3	126.2	1805.2	3.5	7875691	10382788	10252747	10232211	28433732	1.0	1.0	10222333	8395977	10477239	31914476	0.9	0.8	0.6	0.1	1.0	0.7	0.7	0.7	interpolated	benchmark	market	no	NA	NA	0.7	0.2	0.1	0.1	-0.1	0	0.7	0.6	1.1	0.6	0.6	0.7
USA-1996	United States of America	USA	1996	US Dollar	10988194	10926444	269.5	129.9	1818.6	3.5	8440640	11059940	10929891	10918888	30426092	1.0	1.0	10910675	8855808	11165208	33669848	0.9	0.8	0.6	0.1	1.0	0.8	0.7	0.7	benchmark	benchmark	market	no	1.0	NA	0.7	0.2	0.1	0.1	-0.1	0	0.7	0.7	1.2	0.7	0.7	0.7
USA-1998	United States of America	USA	1998	US Dollar	12132393	11956923	276.4	135.1	1842.8	3.6	9099003	12138236	11924765	11916442	32851262	1.0	1.0	11907535	9590438	12341446	35854404	0.9	0.9	0.6	0.1	1.0	0.8	0.8	0.8	interpolated	benchmark	market	no	NA	NA	0.7	0.3	0.1	0.1	-0.1	0	0.7	0.7	1.2	0.6	0.6	0.8
USA-2000	United States of America	USA	2000	US Dollar	13222419	13031820	282.9	139.3	1848.1	3.6	9977582	13511612	13035321	12983206	35997032	1.0	1.0	12975535	10500206	13647352	38439588	0.9	0.9	0.6	0.1	1.0	0.8	0.8	0.8	interpolated	benchmark	market	no	NA	NA	0.7	0.3	0.1	0.1	-0.2	0	0.8	0.7	1.2	0.6	0.6	0.8

#Ejecutamos la funcion 2.
calculo_capital_detail(iso_pais = c("USA","GBR"),1990,2000)->USA_GBR_Dataframe_2
USA_GBR_Dataframe_2%>%
 kable(caption = "Consultando para: EE.UU y Reino Unido 1990-2000",
 digits = 1,align = "l") %>%
 kable_styling(bootstrap_options = "striped",
 full_width = TRUE)

Consultando para: EE.UU y Reino Unido 1990-2000

	isocode	year	ck	rkna	pl_k
GBR-1990	GBR	1990	3581698	6776786	1.1
GBR-1992	GBR	1992	3798598	6966938	1.0
GBR-1994	GBR	1994	4275514	7189067	0.7
GBR-1996	GBR	1996	4926870	7519430	0.8
GBR-1998	GBR	1998	5103451	7832531	0.9
GBR-2000	GBR	2000	5134820	8162493	0.9
USA-1990	USA	1990	26453210	29208678	0.6
USA-1992	USA	1992	26769574	30447546	0.7
USA-1994	USA	1994	28433732	31914476	0.7
USA-1996	USA	1996	30426092	33669848	0.7
USA-1998	USA	1998	32851262	35854404	0.8
USA-2000	USA	2000	35997032	38439588	0.8