U1A12

Análisis de competitividad de actividades económicas

Introducción.

La actividad económica en la sociedad es un pilar fundamental para que las personas puedan subsistir en este mundo que en su mayoria es capitalista, en esta investigación veremos que actividades económicas son las más comunes, las mejor remuneradas y las que la sociedad prefiere para vivir en este planeta.

Cómo empezar

El índice de competitividad se puede llegar a medir de muchas maneras, entre ellos está el PIB producido comparado con otros países, el número de los establecimientos por estado o por país, o con unidades vendidas en sectores específicos como la ganadería, pesca, agricultura, entre otras actividades que aporten gran valor a la economía. A su vez se tiene que tomar en cuenta cuanto provecho se puede obtener de ciertas áreas dependiendo del estado o país, así como la manera en la que los establecimientos compiten entre sí por un puesto alto en el ranking de producción y divisa e ingresos.

La agricultura como actividad económica en México.

  • La agricultura representa el 3.3% del PIB de México y emplea el 12.9% de la población activa del país. Aunque representa un pequeño porcentaje del PIB, México se encuentra entre los mayores productores mundiales de caña de azúcar, café, naranjas, maíz, limones y aguacates.

¿Qué es el PIB?

El producto interior bruto (PIB) es un indicador económico que refleja el valor monetario de todos los bienes y servicios finales producidos por un país o región en un determinado periodo de tiempo, normalmente un año. Se utiliza para medir la riqueza que genera un país. También se conoce como producto bruto interno (PBI).

El PIB mide la producción total de bienes y servicios de un país, por lo que su cálculo es bastante complejo. Tenemos que conocer todos los bienes y servicios finales que ha producido el país y sumarlos. Es decir, la producción de manzanas, leche, libros, barcos, máquinas y todos los bienes que se hayan producido en el país hasta los servicios de un taxi, un dentista, un abogado o un profesor, entre otros. Hay algunos datos que no se incluyen simplemente porque no se pueden contabilizar ni conocer.

Importación y Exportación

En México somos conocidos por exportar en gran número nuestros productos y después importar el produto ya procesado para el consumo en el país. En los prroductos más exportados de México tenemos: * Vehículos de turismo * Aceites crudos de petroleo demineralies bituminosos * Unidades de procesamiento numericas o digitales * Vehículos de transporte de mercancías Y los que más importó fueron: * Aceites de petroleo o de minerales bituminosos * Los demas circuitos integrados monolíticos * Partes y accesorios de máquinas de la partida 84.71 * Unidades de memoria

Importacion de paquetes

library(pacman)
p_load(rmdformats,readr,readxl,ggplot2,plotly,DT,xfun,scales)

Importacion y filtrado de datos

Descarga de código

xfun::embed_file("U1A12.Rmd")

Download U1A12.Rmd

Decarga de los datos

xfun::embed_file("pibt_cte_valor.xlsx")

Download pibt_cte_valor.xlsx

Descarga datos deimportación y exportación

xfun::embed_file("exportacion.xlsx")

Download exportacion.xlsx

xfun::embed_file("importacion.xlsx")

Download importacion.xlsx

Importación de datos

exportacion <- read_excel("exportacion.xlsx")
importacion <- read_excel("importacion.xlsx")
pib <- read_excel("pibt_cte_valor.xlsx")
pib <- select(pib, "Denominación",'2016','2017','2018','2019','2020')

Creación de un dataframe

# Producto interno bruto total
pibtotal <- t(pib[pib$Denominación=='Producto interno bruto, a precios de mercado',2:6])
pibtotal <- as.vector(pibtotal)

# Impuestos a los productos netos
inpuestoProdutos <- t(pib[pib$Denominación=='Impuestos a los productos, netos',2:6])
inpuestoProdutos <- as.vector(inpuestoProdutos)

# Actividades primarias (Entiendase como ganaderia, agricultura etc.)
actividadesPrimarias <- t(pib[pib$Denominación=='Actividades primarias',2:6])
actividadesPrimarias <- as.vector(actividadesPrimarias)

# Actividades secundarias
actividadesSecundarias <- t(pib[pib$Denominación=='Actividades secundarias',2:6])
actividadesSecundarias <- as.vector(actividadesSecundarias)

# Actividades terciarias
actividadesTerciarias <- t(pib[pib$Denominación=='Actividades terciarias',2:6])
actividadesTerciarias <- as.vector(actividadesTerciarias)

# Años utilizados
Anio <- seq(2016,2020)
pibBruto <- data.frame(Anio,pibtotal,inpuestoProdutos, actividadesPrimarias, actividadesSecundarias,actividadesTerciarias)

Visualización de datos en una tabla (Tabla 1)

datatable(pib)

Visualización de datos en una tabla (Tabla 2)

datatable(pibBruto)

Crecimiento del producto interno bruto gracias a las diferentes actividades economicas en el país (Gráfica 1)

ggplotly(ggplot(data=pibBruto)+
  geom_line(aes(x = Anio, y = pibtotal, colour="Producto interno bruto total"))+
  geom_line(aes(x = Anio, y = inpuestoProdutos, colour="Inpuestos a los productos netos"))+
  geom_line(aes(x = Anio, y = actividadesPrimarias, colour="Actividades primarias"))+
  geom_line(aes(x = Anio, y = actividadesSecundarias, colour="Actividades secundarias"))+
  geom_line(aes(x = Anio, y = actividadesTerciarias, colour="Actividades terciarias"))+
  labs(title="Desarrollo de el producto interno bruto a lo largo de los años",subtitle="Fuente: Inegi",x="Año",y="Producto interno bruto (Pesos)")+
    scale_y_continuous(labels = comma))

Tabla de Importación

ggplotly(ggplot(data=importacion,aes(fill=Producto,x=Producto,y=Importe))+
  geom_bar(position = "dodge", stat="identity")+
      theme(axis.text.x = element_text(angle=25,hjust=1),axis.text.y =element_text(size = 6))+scale_y_continuous(labels = comma)+
    labs(title="Gasto de los 4 productos más Importados 2018",x="Producto",y="Egreso(pesos mexicanos)"))

Esta gráfica representa los 4 productos más importados en México para el consumo y producción de servicios y bienes.

Tabla de Exportación

ggplotly(ggplot(data=exportacion,aes(fill=Producto,x=Producto,y=Importe))+
  geom_bar(position = "dodge", stat="identity")+
      theme(axis.text.x = element_text(angle=25,hjust=1),axis.text.y =element_text(size = 6))+scale_y_continuous(labels = comma)+
    labs(title="Gaanancia de los 4 productos más Exportados 2018",x="Producto",y="Importe(pesos mexicanos)"))

Esta gráfica está formada por los 4 productos más exportados de México y sus gancancias.

Conclusión

En esta investigación pudimos ubicar un poco mejor la posición de México en el estado competitivo y nos damos cuenta que no somos los mejores, visto que nuestro PIB no es de los más altos en el mundo ni tampoco los más bajos, actualmente tenemos el mejor lugar de economía en latinoamerica , además de contar con un gran desarrollo de actividades terciarias y secundarias como semuestra en la página. Por último cabe decir que estamos en una posición que puede ser mejorada como se puede apreciar en la información en las distintas fuentes donde hemos decaído de lugares y también prevalecido en otros casos.

Bibliografía

Arias, A. S. (2021, 17 enero). Producto interior bruto (PIB). Economipedia. https://economipedia.com/definiciones/producto-interior-bruto-pib.html

E.D.N.I.Y. (2018, 8 noviembre). Por actividad económica. inegi.org.mx. https://www.inegi.org.mx/temas/pib/#Tabulados

Estafeta. (2020, 2 marzo). Estafeta | Actividades económicas de México. estafeta.com. https://www.estafeta.com/Articulos-Blog/2020/Actividades-economicas-de-Mexico#:%7E:text=Retomando%20el%20tema%20de%20las,%2C%20agricultura%2C%20silvicultura%20y%20pesca

Inegi. (2018, 8 noviembre). Descarga masiva. inegi.org.mx. https://www.inegi.org.mx/app/descarga/?ti=6#

México Datos comerciales básicos : Valor más reciente. (2018, 11 mayo). wits.worldbank.org/. https://wits.worldbank.org/countrysnapshot/es/MEX/textview#:~:text=Importaciones%20de%20M%C3%A9xico%20Materias%20primas,y%20una%20proporci%C3%B3n%20de%208.87%25.&text=Exportaciones%20de%20M%C3%A9xico%20Bienes%20de,y%20una%20proporci%C3%B3n%20de%2030.38%25