Análisis de Apicultura en México
Acerca de este documento
Este es un documento basado en el análisis de las abejas y todo lo que se le relacione, a través de gráficas y tablas que representan los datos dados en la contribución de la abeja al ecosistema, así mismo factores realizados por humanos que pueden llegar a la extinción, esto representado en datos de diferentes variables.
Las abejas son fundamentales para un equilibrio del medio ambiente ya que al obtener el alimento de las flores fomentan en las plantas la capacidad de fecundarse, actividad llamada polinización cruzada, con ésta, las plantas generan el oxígeno suficiente para la vida y además, aumentan el rendimiento en los cultivos, lo que favorece un incremento en alimentos de origen vegetal, materia prima textil, e insumos agropecuarios.
Datos obtenidos [Apicultura]
Para la descarga de este código
Para fines de reproducibilidad inmediata se incluye todo el código para su descarga
xfun::embed_file("U1A9.Rmd")Introduccion
La apicultura se describe como la actividad dedicada a la crianza de las abejas, brindándoles los cuidados necesarios con el objetivo de obtener y consumir los productos que son capaces de elaborar y recolectar. El principal producto que se obtiene de esta actividad es la miel, sin embargo también se procesan productos no menos importantes como el polen, jalea real, propóleos y veneno de abejas.
“Alrededor del 70% de la agricultura mundial es posible por las abejas, que favorecen la polinización y reproducción de las plantas, lo cual equivale al 35% de la producción de alimentos.”
Preguntas
1.¿Por qué las abejas importan tanto a la humanidad?
La agricultura es la primera y auténtica beneficiaria de los servicios prestados por las abejas. Su contribución en términos económicos es realmente significativa, hasta tal punto que la renta directa de la apicultura (miel, cera, polen y otros productos) pasa a un segundo término. Setenta de los 100 principales cultivos alimentarios que se cultivan en todo el mundo dependen de polinizadores, lo que equivale al 90 por ciento de la nutrición mundial. Sin la existencia de las abejas abría una escasez de alimentos.
Las abejas son mucho más que un pequeño insecto con el que los seres humanos compartimos el planeta, pues son las encargadas de polinizar vegetales en parcelas cercanas a sus colmenas, lo que contribuye a mejorar la biodiversidad, para que después, los polinizadores como pájaros, mariposas y murciélagos transporten el polen de flor en flor para fertilizar a las plantas. Este proceso permite la germinación de semillas y el crecimiento de frutos, es decir, sin abejas no habría alimentos. También existiriían consecuencias económicas ya que las abejas contribuyen alrededor de 3,250 pesos a la producción de cultivos por hectárea al año. Para poner eso en contexto, la Organización de las Naciones Unidas para la Agricultura y la Alimentación estima que 1.400 millones de hectáreas de tierra en todo el mundo se cultivan actualmente para cultivos. Eso equivale a agregar alrededor de $4.2 billones a la economía global.
2.¿Por qué las abejas están desapareciendo tan rápidamente?
La cantidad de abejas y otros polinizadores se está reduciendo en muchas partes del mundo debido, en buena parte, a las prácticas agrícolas intensivas, el monocultivo, el uso excesivo de productos químicos agrícolas y a unas temperaturas más altas asociadas al cambio climático, que afectan no solo a los rendimientos de los cultivos sino también la nutrición. Si esta tendencia continúa, cada vez con más frecuencias los cultivos nutritivos como frutas, nueces y muchas verduras serán sustituidos por cultivos básicos como el arroz, el maíz y las patatas, lo que podría derivar en una dieta desequilibrada.
En México la proliferación de cultivos de maíz ha presentado un grave problema para estos polinizadores, ya que quitan espacio para flores con polen, de las que se alimentan. Por otro lado, su hábitat natural está desapareciendo poco a poco; el campo se ve cada vez más reducido por la deforestación, según la SEMARNAT en los últimos 20 años el país ha perdido entre 155 mil y 776 mil hectáreas de bosques y selvas.
3.¿Cómo podemos responder estas preguntas?
library(pacman) #Para importar la biblioteca "pacman"
p_load("base64enc", "htmltools", "mime", "xfun", "prettydoc","readr", "knitr","DT","dplyr", "ggplot2","plotly", "gganimate","gifski","scales")Gráfica de linea acerca las Colmenas a traves de años México
library(readxl)
colmenass <- read_excel("Colmenas.xlsx")
colmenas <- ggplot(data = colmenass) +
geom_line(aes(Fecha, Colmenas, colour="Colmenas")) +
xlab("Año") +
ylab("Cantidad de Colmenas") +
ggtitle("Colmenas a través de los años")
library(plotly)
ggplotly(colmenas)Grafica de Pastel acerca de las Unidades de Producción por entidad y municipio de Sonora
library(readxl)
Unidades <- read_excel("Unidades.xlsx")
ggplot(Unidades, aes(x=0, y= Produccion, fill=Municipio)) +
geom_bar(stat ="identity",color="white")+
geom_text(aes(label=percent(Produccion/281)),
position=position_stack(vjust=0.5),color="Black",size=2,)+
coord_polar(theta="y")
Gráfica de Barra acerca de Existencias de Colmenas por Entidad y Municipio de Sonora
library(readxl)
Existenciass<- read_excel("Existencias.xlsx")
library(ggplot2)
Municipios <- Existenciass$Municipio
num <- Existenciass$Existencias
datos <- data.frame(num, Municipios)
colme <- ggplot(Existenciass, aes(y=num, x=Municipios))+
geom_bar(position="dodge", stat="identity", fill= "pink")+
labs(x="Municipios", y="Cantidad de Colmenas", title="Numero de Colmenas por municipio en Sonora") +
theme(axis.text.x = element_text(angle=90, hjust=1),axis.text.y =element_text(size = 6))
library(plotly)
ggplotly(colme)Gráfica de la Relación del uso de Plaguicida
Escal <- colmenass$Escala
rel <- ggplot(data = colmenass) +
geom_line(aes(Fecha, Toneladas, colour="Toneladas de pesticidas")) +
geom_line(aes(Fecha, Escal, colour="Colmenas (escala)")) +
xlab("Año") +
ylab("Comportamiento") +
ggtitle("Relación entre el uso de pesticidas y las colmenas de abeja (1990-2018)") +
theme_linedraw()
geom_point## function (mapping = NULL, data = NULL, stat = "identity", position = "identity",
## ..., na.rm = FALSE, show.legend = NA, inherit.aes = TRUE)
## {
## layer(data = data, mapping = mapping, stat = stat, geom = GeomPoint,
## position = position, show.legend = show.legend, inherit.aes = inherit.aes,
## params = list(na.rm = na.rm, ...))
## }
## <bytecode: 0x000000001c2a1380>
## <environment: namespace:ggplot2>ggplotly(rel)- Gráfico: Pesticidas uso.
Pest <- ggplot(data = colmenass) +
geom_line(aes(Fecha, Toneladas, colour="Toneladas de pesticidas")) +
xlab("Año") +
ylab("Toneladas") +
ggtitle("Pesticidas uso (1990-2018)") +
theme_linedraw()
geom_point## function (mapping = NULL, data = NULL, stat = "identity", position = "identity",
## ..., na.rm = FALSE, show.legend = NA, inherit.aes = TRUE)
## {
## layer(data = data, mapping = mapping, stat = stat, geom = GeomPoint,
## position = position, show.legend = show.legend, inherit.aes = inherit.aes,
## params = list(na.rm = na.rm, ...))
## }
## <bytecode: 0x000000001c2a1380>
## <environment: namespace:ggplot2> transition_reveal(Fecha)## <ggproto object: Class TransitionReveal, Transition, gg>
## adjust_nframes: function
## expand_data: function
## expand_layer: function
## expand_panel: function
## finish_data: function
## get_all_row_vars: function
## get_frame_data: function
## get_frame_vars: function
## get_row_vars: function
## map_data: function
## mapping: (.+)
## params: list
## remap_frames: function
## require_late_tween: function
## setup_params: function
## setup_params2: function
## static_layers: function
## unmap_frames: function
## var_names: along
## super: <ggproto object: Class TransitionReveal, Transition, gg>ggplotly(Pest)Conclusión
Bibliografías
- Organización de las Naciones Unidas para la Alimentación y la Agricultura. (2019, 20 mayo). La reducción de la población de abejas es una amenaza para la seguridad alimentaria y la nutrición. Recuperado 23 de febrero de 2021, de http://www.fao.org/news/story/es/item/1194963/icode/
- Expansión. (2019, 20 mayo). ¿Por qué son importantes las abejas en el mundo? La ONU lo resume en 10 puntos. Recuperado 23 de febrero de 2021, de https://expansion.mx/tendencias/2019/05/20/por-que-son-importantes-las-abejas-en-el-mundo-la-onu-lo-resume-en-10-puntos