Analisis de Producción en agricultura

Daniela Zazueta, Reynaldo Moreno, José MAnzano

16/02/2021

setwd("~/estadistica aplicada")
library(pacman)
library(readxl)
library(grDevices)
library(plotrix)
library(ggplot2)
library(scales)
## 
## Attaching package: 'scales'
## The following object is masked from 'package:plotrix':
## 
##     rescale
p_load("base64enc", "htmltools", "mime", "xfun", "prettydoc", "readr", "ggplot2", "tidyr", "plotly", "readr")

AGRICULTURA EN MÉXICO

Análisis de la producción de agrícola en México.

INTRODUCCIÓN

La agricultura hoy en día es considerada como una de las principales activades economicas en México debido a la gran cantidad de productos que se puede obtener obtener de esta misma, sin contar el beneficio social, ambiental e incluso que representa esta práctica para miles de personas en México. Actualmente existen alrededor demás de 200 productos agrícolas cultivados en el país entre ellos podemos encontrar maíz, frijol, trigo, arroz, sorgo, caña de azúcar, tomate, chile y las oleaginosas.

OBJETIVO

El objetivo de este trabajo es presentar los datos sobre la producción agricola y alguno de sus desarrollo que permitan tener una vista general sobre lo que conlleva esta actividad economica en México.

DESARROLLO

La activida de la agrícultura es una actividad economica de producción que se basa en el cultivo de diferentes especies vegetales de temporada en un area o superficie determinada, por lo general medida en hectareas, la cual esta en monitoreo y cuidado durante el tiempo de maduración del vegetal cultivado permitiendo de esta manera poder obtener vegetales a gran cantidad con los que se puede obtener un beneficio ya sea economico o de alimentación personal.

  • Área de Cultivo

Actualmente para esta actividad se usan miles de hectareas para la producción de diferentes grupos de vegetales que se distribuyen a diferentes partes de México, curiosanmente podemos ver como año tras año este territorio se va disminuyendo y esto es gracias al crecimiento poblacional y urbanización de espacios que anteriormente estaban utilizados para ello algo que pone en riesgo esta actividad.

AreaCult <- read.csv("AreaCultivada.csv")

barplot(AreaCult$AreaTotal ~ AreaCult$Anual , col= terrain.colors(3), main="Area Cultivada en Hectareas", ylab= "Hectareas cultivadas ", xlab= "Año"  )

Figura 1. Gráfico de área por hectareas de uso en Agrícultura

Debido a la gran diferencia y variedad en las plantas la cantidad de hectareas que se utilizan para la agricultura dentro de cada region en México es muy variable solo aquellas grupos que se produzcan mayoritariamente tendran por lo tanto mayores hectareas de cultivo como los cereales pero existen otros casos como en las frutas en la que esta relación no es determinante.

AreaCult <- read_csv("AreaCultivada.csv")
## 
## -- Column specification --------------------------------------------------------
## cols(
##   Ámbito = col_character(),
##   Área = col_character(),
##   Elemento = col_character(),
##   Producto = col_character(),
##   Fecha = col_double(),
##   ha = col_double(),
##   Anual = col_double(),
##   AreaTotal = col_double(),
##   Totalprod = col_character(),
##   Ano2017 = col_double(),
##   Ano2018 = col_double(),
##   Ano2019 = col_double()
## )
barplot(AreaCult$Ano2017 ~ AreaCult$Totalprod , col= terrain.colors(9), main="Area en Hectareas en 2017 por Grupo ", ylab= "Hectareas", xlab= "Cultivo"  )

barplot(AreaCult$Ano2018 ~ AreaCult$Totalprod , col= terrain.colors(9), main="Area en Hectareas en 2018 por Grupo ", ylab= "Hectareas", xlab= "Cultivo"  )

barplot(AreaCult$Ano2019 ~ AreaCult$Totalprod , col= terrain.colors(9), main="Area en Hectareas en 2019 por Grupo ", ylab= "Hectareas", xlab= "Cultivo"  )

Figuras 2. Gráficos de Relación de hectareas cultivadas por grupo de cultivos en 2017, 2018 y 2019

  • Producción

México actualmente produce grandes cantidades de toneladas al año de diferentes especies como se puede observar en las graficas donde podemos destacar 3 tipos de productos principales como los son los frutos primarios, cereales y cultivos de fibra los cuales se llevan alrededor del 80% de la producción en todo México.

Agriprod <- read.csv("Produccion.csv")
Pro <- ggplot(data=Agriprod, aes(x=Anual, y=Produccion)) + 
    geom_bar(stat="identity", position="stack", fill = terrain.colors(3), mainlab = "Produccion en toneladas Anual ") 
## Warning: Ignoring unknown parameters: mainlab
Pro + coord_flip()
## Warning: Removed 24 rows containing missing values (position_stack).

ggplot(Agriprod,aes(x=1 ,y=Ano2017, fill=ProductoT))+
  geom_bar(stat = "identity",color="white")+
  geom_text(aes(label=percent(Ano2017/148179466)),
              position=position_stack(vjust=0.5),color="white",size=3,)+
  coord_polar(theta="y")
## Warning: Removed 18 rows containing missing values (position_stack).
## Warning: Removed 18 rows containing missing values (position_stack).

ggplot(Agriprod,aes(x=1 ,y=Ano2018, fill=ProductoT))+
  geom_bar(stat = "identity",color="white")+
  geom_text(aes(label=percent(Ano2017/148339956)),
              position=position_stack(vjust=0.5),color="white",size=3)+
  coord_polar(theta="y")
## Warning: Removed 18 rows containing missing values (position_stack).

## Warning: Removed 18 rows containing missing values (position_stack).

ggplot(Agriprod,aes(x=1 ,y=Ano2019, fill=ProductoT))+
  geom_bar(stat = "identity",color="white")+
  geom_text(aes(label=percent(Ano2017/150381633)),
              position=position_stack(vjust=0.5),color="white",size=3)+
  coord_polar(theta="y")
## Warning: Removed 18 rows containing missing values (position_stack).

## Warning: Removed 18 rows containing missing values (position_stack).

Figuras 3. Gráficos de Relación de producción por año y por grupos

Con estas gráficos podemos identificar que México tiene una gran estabilidad en la actividad de agrícultura puesto que de una gran variedad de cultivos obtiene grandes cantidades de producción donde considerando que este tiene un gran territorio y enriquecidos suelos practicamente no es un gran trabajo recibir beneficio de ello y no solo por la economía mexicana, también podemos verlo en otros países con productos muy populares como lo es el aguacate.

Análisis de Producción de Aguacate

El aguacate mexicano es muy preciado por los extranjeros, lo que impulsó la producción y generó un mayor monto de divisas por concepto de exportaciones, aquí te explicamos cómo este fruto se ha convertido en el ‘oro verde’. El aguacate ya es uno de los principales productos de exportación de México

  • Principales productores de aguacate en México

La producción obtenida de aguacate en México es de 206 mil 466 toneladas (ton); 0.5% (1,026) mayor en relación con la obtenida en el mismo periodo del año previo (205,439). Michoacán (líder productor indiscutible), aporta 94.6% (195,366 ton) al total nacional, seguido de Jalisco con 4.7% (9,759 ton), estas dos entidades federativas concentran 99.4% (205mil 125 ton) de la producción del país.

Año2019 <- read_excel("productores de aguacate 2019.xlsx")
Año2020 <- read_excel("produccion de aguacate 2020.xlsx")
p <- par(mfrow =c(1,1), cex.axis=.7, cex.lab=.9 ) 

barplot(Año2019$toneladas ~ Año2019$estado, col=topo.colors(7), main="tonelas 2019"  )

barplot(Año2020$toneladas ~ Año2020$estado, col=topo.colors(7), main="toneladas 2020"  )

Figura 4. Gráficos representativos de la producción de aguacate en mexico

  • Exportación de Aguacate

Mexico es el principal exportador de aguacates en el mundo.la expancion de sus plantaciones y los mayores rendimientos de cosechas sutentan el ritmo de comercializacion internacional.

prod <- read_excel("principales exportadores 2.xlsx")
Producto <- c(prod$millonesdedolares)
pais <- c(prod$pais)
pais <- paste(pais, Producto)

pie3D(Producto, pais, explode= 0.2, edges = NA, radius = .85, height = .15, theta = pi/3, start=0,border=par("fg"), labelcex = 1,
    main= "principales exportadores de agucate en el mundo (millones de dolares)",
    col = terrain.colors(5))

Figura 5. grafico de los principales exportadores y sus ganancias en millones de pesos

De cada 10 aguacates comercializados a nivel mundial, tres son vendidos por productores de aguacate mexicanos.

El principal consumidor de aguacate mexicano son los Estados Unidos, aún cuando se trata de un país productor de aguacate (Se explica en parte por la demanda de la creciente comunidad latina en el país). Japón es el segundo consumidor más grande. Del total de aguacate que adquire estados unidos el 97.8% es mexicano

CONCLUSIÓN

Con todo lo anterior visto podemos decir que la agricultura es una practica realmente productiva y estable con respecto al desarrollo de su práctica para México en muchos aspectos, principalmente economico puesto que con este podemos ver reflejado de manera contabilizada todos los datos que lo envuelven y se puede obserbar que el aguacate es uno de los productos más exitosos de la exportación agroalimentaria nacional. México es el principal proveedor del mercado internacional con una aportación de 45.95% del valor de las exportaciones mundiales.