library(base64enc)
library(htmltools)
library(mime)
library(xfun)
##
## Attaching package: 'xfun'
## The following objects are masked from 'package:base':
##
## attr, isFALSE
library(prettydoc)
library(readr)
library(ggplot2)
library(tidyr)
library(plotly)
##
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
##
## last_plot
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:graphics':
##
## layout
library(DT)
library(ggpubr)
library(tidyverse)
## -- Attaching packages ------------------------------------ tidyverse 1.3.0 --
## v tibble 3.0.1 v stringr 1.4.0
## v purrr 0.3.4 v forcats 0.5.0
## v dplyr 1.0.0
## -- Conflicts --------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks plotly::filter(), stats::filter()
## x dplyr::lag() masks stats::lag()
library(Hmisc)
## Loading required package: lattice
## Loading required package: survival
## Loading required package: Formula
##
## Attaching package: 'Hmisc'
## The following objects are masked from 'package:dplyr':
##
## src, summarize
## The following object is masked from 'package:plotly':
##
## subplot
## The following objects are masked from 'package:base':
##
## format.pval, units
library(corrplot)
## corrplot 0.84 loaded
library(readxl)
setwd("~/PROBABILIDAD/avance/")
Una interesante definición para inteligencia de negocios o BI, por sus siglas en inglés, según el Data Warehouse Institute, lo define como la combinación de tecnología, herramientas y procesos que me permiten transformar mis datos almacenados en información, esta información en conocimiento y este conocimiento dirigido a un plan o una estrategia comercial. La inteligencia de negocios debe ser parte de la estrategia empresarial, esta le permite optimizar la utilización de recursos, monitorear el cumplimiento de los objetivos de la empresa y la capacidad de tomar buenas decisiones para así obtener mejores resultados(Tableu, 2020).
La inteligencia de negocios, desde un punto de vista general cubre los procesos y métodos de recopilación, almacenamiento y análisis de datos de operaciones o actividades comerciales para optimizar el rendimiento. Todas estas cosas se unen para crear una visión integral de un negocio con la finalidad de ayudar a las personas a tomar mejores decisiones(SE, 2020).
La Inversión Extranjera se ha consolidado como una fuente complementaria de recursos para financiar el crecimiento económico de nuestro país. Además la inversión extranjera representa una fuente de generación de empleo y transferencia de tecnología. México es el segundo receptor de inversión de extranjera directa en América Latina, recibiendo en promedio 18 mil millones de dólares al año. Uno de los objetivos del Gobierno de México es mantener al país como uno de los principales destinos de las inversiones extranjeras en beneficio del sector productivo de todos los estados y municipios. Sonora recibió 109 millones de dólares por concepto de inversión extranjera directa (IED) en 2010, lo que representó 0.6% de la IED recibida en México. La industria manufacturera concentró 95% de la inversión extranjera directa recibida por el estado en 2010(SE, 2012).
El objetivo general es comparar el panorama economico de sonora en un contexto de inversion/exportacion internacional.
El análisis se hará para las seis entidades federativas del Norte de México (Baja California, Sonora, Chihuahua, Coahuila, Nuevo León, y Tamaulipas) tomando la industria de manufactura por la importancia que tiene porcentualmente en la inversión extranjera respecto a otros sectores.
¿Cómo es la inversión extranjera en Sonora en comparación de otros estados?
Tabla 1. IED Manufacturera por entidad del Norte
# EstadosNorte <- read_excel("EstadosNorte.xlsx", sheet = "IED")
# datatable(EstadosNorte) %>%
# formatCurrency(c("2004","2005","2006","2007","2008","2009","2010","2011","2012","2013","2014"))
EstadosNorteIED <- read_excel("EstadosNorte.xlsx", sheet = "IEDProgreso2")
g1 <- ggplot(EstadosNorteIED, aes(x=Anio, y=Valor, col=Estado, size = "0.1")) + geom_line() +
labs(x= "Periodos", y = "IED", title = "Gráfico 1: Inversión Directa por Estado y Ejercicio")
plot(g1)
El estado de Sonora, recibió durante 2004-2014 flujos de IED por 3,923 MDD, de los cuales 1,556 MDD se generaron en el subsector de Fabricación de equipo de transporte, cerca de 40%. De ahí siguen otros subsectores como bebidas y tabaco con 823 MDD y Fabricación de equipo de computación, comunicación, medición y de otros equipos, componentes y accesorios electrónicos con 487 MDD, muy inferior a los primeros dos. Es importante destacar que en Sonora, el sector que recientemente ha recibido IED importante es la Fabricación de accesorios, aparatos eléctricos y equipo de generación de energía eléctrica, con un acumulado de 298 MDD en el periodo, pero de los cuales 170 MDD se generaron en el periodo 2013-2014.
¿Cómo ha evolucionado la productividad económica en comparación con otros estados?
La inversión extranjera se ha estado disminuyendo desde el 2016 y la participación de Sonora en la media nacional lo ubica en la posición número 21 al 2019, sin embargo existe una oportunidad importante de crecer la inversión extranjera ya que Sonora tiene una relación comercial muy estrecha con el estado de Arizona en USA con el cual compartimos frontera.
El estado de Sonora busca consolidarse como una entidad atractiva y competitiva ante otros estados fronterizos para atraer inversión extranjera directa y generar empleos, mediante el mejoramiento y modernización de los puertos fronterizos y la infraestructura y logística para el movimiento internacional de mercancías y personas.
TablaSectores <- read.csv("TablaSectores.csv")
head(TablaSectores)
bp<- ggplot(TablaSectores, aes(x="", y=Empresas, fill=Categoria)) +
geom_bar(width = 1, stat = "identity") +
labs(title = "Gráfico 2: Inversión Directa por Sectores económicos")
pie <- bp + coord_polar("y", start=0)
Tabla 2: Participación por estado en cada sector
EstadosNorteParticipacionSector <- read_excel("EstadosNorte.xlsx", sheet = "IEDPorSector")
# datatable(EstadosNorteParticipacionSector) %>%
# formatCurrency(c("BC","Chi","Coa","NL","Son","Tam","IED (MDD)")) %>%
# formatPercentage(c("%BC","%Chi","%Coa","%NL","%Son","%Tam","%Total")) %>%
# formatStyle(
# 'Son',
# backgroundColor = 'yellow') %>%
# formatStyle(
# '%Son',
# backgroundColor = 'yellow')
La inversión extranjera directa (IED) combinada entre los estados de Sonora y Arizona para el año 2016 se han estimado en 586 millones de dólares con una proyección para el 2021 de 700 millones de dólares. Debido a los lazos y estrategias en común entre los dos estados han formado una ‘mega región” con el propósito de incrementar la cooperación y participación en el flujo comercial.
¿Los estados que más tienen inversión extranjera son también los que más exportan?
No existe una relación proporcional entre las exportaciones e inversión directa, ya que cada parte tiene negociaciones indpendientes e incluso objetivos diferentes.
IEDvsExportacion <- read_excel("EstadosNorte.xlsx", sheet = "IEDvsExportaciones")
IEDvsExportacionSonora <- IEDvsExportacion %>% filter(IEDvsExportacion$Estado == 'Sonora')
regresion <- lm(IEDvsExportacionSonora$IED ~ IEDvsExportacionSonora$Exportacion, data=IEDvsExportacionSonora)
summary(regresion)
##
## Call:
## lm(formula = IEDvsExportacionSonora$IED ~ IEDvsExportacionSonora$Exportacion,
## data = IEDvsExportacionSonora)
##
## Residuals:
## Min 1Q Median 3Q Max
## -205.84 -135.13 -10.16 61.04 332.33
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 709.42124 248.28535 2.857 0.0189 *
## IEDvsExportacionSonora$Exportacion -0.03618 0.01759 -2.058 0.0697 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 188.1 on 9 degrees of freedom
## Multiple R-squared: 0.3199, Adjusted R-squared: 0.2444
## F-statistic: 4.234 on 1 and 9 DF, p-value: 0.06974
predict(regresion)
## 1 2 3 4 5 6 7 8
## 411.18975 360.35073 286.93266 261.89309 198.85993 157.06700 218.72515 223.86333
## 9 10 11
## 158.44200 -26.24297 81.36932
op <- par(mfrow =c(1,2), cex.axis=.7, cex.lab=.9 )
ggplot(IEDvsExportacion, aes(x=Anio, y=IED, col=Estado, size = "0.1")) + geom_line() +
labs(x= "Periodos", y = "Monto", title = "Gráfico A: IED")
ggplot(IEDvsExportacion, aes(x=Anio, y=Exportacion, col=Estado, size = "0.1")) + geom_line() +
labs(x= "Periodos", y = "Monto", title = "Gráfico B: Exportaciones")
ggscatter (IEDvsExportacionSonora, x="Exportacion", y= "IED",
add = "reg.line", conf.int = TRUE,
cor.coef = TRUE, cor.method = "pearson",
xlab = "Ejercicio", ylab= "Inversión") +
labs(title = "Gráfica C: Correlación de Pearson")
## `geom_smooth()` using formula 'y ~ x'
op <- par(mfrow =c(1,2), cex.axis=.7, cex.lab=.9)
barplot(tapply(IEDvsExportacionSonora$Exportacion, list(IEDvsExportacionSonora$Anio), mean ), beside = T, main="Exportación")
barplot(tapply(IEDvsExportacionSonora$IED, list(IEDvsExportacionSonora$Anio), mean ), beside = T, main="IED")
La relación es negativa, por tanto es inversamente propocional lo que significa que a mayor exportación, menor IED tenemos. Al menos es la tendencia de los últimos años del estudio.
Según estudios recopilados de la Universidad Nacional de Colombia, existen diversos factores o condiciones en los que un país externo se fija a la hora de decidir si realizar la inversión o no, estos son los “determinantes de inversión extranjera”, entre los cuales resaltan:
La tasa de cambio: pues un país interesado en invertir investiga cómo es que la devaluación o revaluación de la moneda del país y estado candidato contribuyen en los flujos de IED.
Tamaño del mercado: muy atractivo para las empresas extranjeras, este determinante puede para algunos países ser el más importante en cuanto a IED, pues un mercado de mayor magnitud es un mercado con más posibilidades.
Infraestructura: contar con obras infraestructurales como puertos, aeropuertos y vías ferroviarias facilita y aumenta el flujo de IED.
Acuerdos comerciales: desempeñan un papel importante en el flujo de IED porque incrementa el tamaño de mercado y facilita las inversiones de los países miembros y, porque en los acuerdos se establecen normas claras sobre el tratamiento de los activos.
Mano de obra: Uno de los motivos que mueve a las empresas multinacionales a realizar IED en países en desarrollo es tener acceso a un mercado laboral más flexible y, por tanto, una mano de obra más barata.
Impuestos: Se considera que la reducción de impuestos en el país receptor atraería capital extranjero hacia sus economías, pues una meta relevante de las corporaciones multinacionales es la minimización del pago de impuestos.
Por último, en este trabajo se comparó la inversión extranjera de Sonora con otros Estados tomando en cuenta la industria manufacturera. Sonora es un es el segundo estado más grande del país que cuenta con muchas riquezas y ganancias, una de ellas es la producción manufacturera ocupando el 5to lugar en la IED manufacturera del norte. Pero a pesar de sus recursos, sonora está teniendo problemas en el ámbito de las relaciones extranjeras, las cuales han estado disminuyendo, pero a pesar de eso, Sonora encontró una muy importante posibilidad para crecer en la inversión extranjera con el estado de Arizona, con el país de Estados Unidos de América, esto puede impulsar un crecimiento y desarrollo económico, mediante el impulso de un ambiente de negocios y cultura empresarial.
¿En que ayudaría a Sonora su relación con Arizona?
Esta relación puede ayudar a Sonora para desarrollarse y tener más ventajas competitivas, permitiría la llegada de más y mejores inversiones en diferentes sectores. inversión extranjera directa (IED) combinada entre los estados de Sonora y Arizona para el año 2016 se han estimado en 586 millones de dólares con una proyección para el 2021 de 700 millones de dólares. Debido a los lazos y estrategias en común entre los dos estados han formado una ‘mega región” A pesar de la decadencia de flujos de IED desde el año 2008, ha aprovechado sus recursos para la fabricación de equipos electronicos, accesorios y equipos de generación eléctrica, equipos de transporte, equipos de comunicación, medición, etc. y en su búsqueda por consolidarse como una entidad atractiva y competitiva ante otros estados fronterizos para atraer inversión extranjera directa ha ideado estrategias como su alianza con el estado de Arizona en USA, mediante la modernización de puertos fronterizos, infraestructura, y logística para el movimiento internacional de mercancías y personas.