U1A11

---

QUINTO ESTUDI DE CASO: “Análisis del panorama de la producción ganadera en Sonora”

Descarga de este código

xfun::embed_file("U1A11.Rmd")

Download U1A11.Rmd

Acerca de este documento

• Los datos fueron obtenidos de http://infosiap.siap.gob.mx/gobmx/datosAbiertos_p.php

Introducción

La actividad ganadera hace referencia a la domesticación de los animales como cerdos, vacas, pollos, borregos, etc., y es una actividad del sector primario que incluye su cuidado y alimentación, a su vez está enfocada básicamente en la generación de alimentos para consumo humano. México es el séptimo productor mundial de proteína animal, esto es muestra del alto potencial de desarrollo que tiene y las ventajas competitivas que presenta el sector.

Importación de datos

setwd("~/estadistica")
library(readxl)
library(tidyverse)

## -- Attaching packages --------------------------------------- tidyverse 1.3.0 --

## v ggplot2 3.3.3     v purrr   0.3.4
## v tibble  3.0.5     v dplyr   1.0.4
## v tidyr   1.1.2     v stringr 1.4.0
## v readr   1.4.0     v forcats 0.5.1

## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

library(prettydoc)
library(readr)
library(DT)
library(pacman)
p_load("base64enc","htmltools","mime","xfun","prettydoc","readr","knitr","DT","dplyr","ggplot2","plotly","gganimate","gifski","scales")

gan19 <- read.csv("~/estadistica/ganaderiasonora_2019.csv")
View(gan19)

Tabla de datos

datatable(gan19)

GRAFICACIÓN DE DATOS

Gráfica sobre el volumen de cada especie consumida en las entidades de Sonora en el año de 2019.

ggplotly(ggplot(gan19, aes(fill=Volumen, y=Especie, x=Entidad))+
  geom_bar(position="dodge", stat="identity")+
  labs(x="Entidad", y="Especie", title="Especies consumidas las entidades de Sonora 2019 ", subtitle="Fuente: SIAP")+
      theme(axis.text.x = element_text(angle=90,hjust=1),axis.text.y =element_text(size = 6)))

• Esta gráfica nos demuestra que en la mayoría de las entidades de sonora se genera una gran cantidad en volumen de ganadería, siendo así la especie más consumida el porcino.

Gráfica sobre el tipo de producto en relación al consumo por entidad enn Sonora (2019)

gan2 <- ggplot(gan19, aes(fill=Entidad, y=Producto)) + 
  geom_bar(position = "dodge", stat= "count") + 
  xlab("Entidades en Sonora") + 
  ylab("Producto") +
  ggtitle("Tipo de producto consumido en cada entidad de Sonora")
ggplotly(gan2)

• En esta gráfica se observa que tipo de producto fue consumido en cada entidad de Sonora en el año 2019, Cajeme y Moctezuma consumio una enorme parte de lo que es carne y se tenía mucho ganado en pie.

Gráfica donde se muestra la especie consumida en los municipios de las entidades de Sonora (2019)

gan3 <- ggplot(gan19, aes(fill=Municipio, y=Especie)) + 
  geom_bar(position = "dodge", stat= "count") + 
  xlab("Municipios de cada entidad") + 
  ylab("Producto") +
  ggtitle("Especie consumida en cada municipio de las entidades")
ggplotly(gan3)

• Esta gráfica nos arroja información sobre que tipo de especie fue más consumido en los municipios de Sonora en el año 2019. Municipios como Guaymas, Navojoa y Etchojoa consumieron una cantidad muy significativa de la mayoría de las especies.

Gráfica donde se muestra el volumen por especie en Sonora (2019)

ggplotly(ggplot(gan19, aes(fill=Especie,y=Volumen, x=Especie))+
  geom_bar(position="dodge", stat="identity")+
  labs(x="Especie", y="Volumen (Cabeza)", title="Volumen de cada especie en Sonora 2019", subtitle="Fuente: SIAP")+
      theme(axis.text.x = element_text(angle=90,hjust=1),axis.text.y =element_text(size = 6)))

• Se observa como fue el total de volumen (por cabeza) de cada especie en Sonora (2019). Es muy notorio como es que la especie porcina tuvo mucho más volumen durante este año en comparación con las demás especies.

Gráfica sobre el precie por especie en Sonora (2019)

ggplotly(ggplot(gan19, aes(fill=Especie, y=Precio, x=Especie))+
  geom_bar(position="dodge", stat="identity")+
  labs(x="Especie", y="Pesos mexicanos", title="Precio por especie en Sonora 2019 ", subtitle="Fuente: SIAP")+
      theme(axis.text.x = element_text(angle=90,hjust=1),axis.text.y =element_text(size = 6)))

• Esta gráfica representa el precio en pesos mexicanos de cada especie en el año 2019 de Sonora. La especie que tuvo el costo más elevado fue el bovino.

Gráfica que demuestra en volumen los productos más utilizados por especie en Sonora en 2019

ggplotly(ggplot(gan19, aes(fill=Volumen, y=Producto, x=Especie))+
  geom_bar(position="dodge", stat="identity")+
  labs(x="Especie", y="Producto", title="Especie utilizada para cada producto en Sonora 2019 ", subtitle="Fuente: SIAP")+
      theme(axis.text.x = element_text(angle=90,hjust=1),axis.text.y =element_text(size = 6)))

• La gráfica nos muestra que tipo de producti se crea por cada especie. Nos damos cuenta que la especie porcina fue muy utilizada para el producto de carne y del ganado en pie.

CONCLUSIÓN

• Consideramos que la ganadería en Sonora tiene un valor más social que económico: aunque solo representa 3.1% del producto interno bruto de la entidad, se practica en 85% de la superficie del estado y de ella dependen directamente más de 35 mil familias.

• Esto es así porque solo ese mercado reconoce y paga la calidad tanto genética como sanitaria del ganado de Sonora. Los ganaderos sonorenses saben producir y lo hacen muy bien.

• Al gráficar nos dimos cuenta que se producce un gran volumen de productos a partir de la ganadería, en donde la especie porcina fue una gran impulsora en Sonora durante 2019