- CASO DE ESTUDIO 11: Relación entre el cambio climatico y el desarrollo econónomico
- Introducción
- ¿El cambio climático afecta de igual forma a todos los países?
- Descarga de este código
- Importación de datos
- Variación de CO2 vs PIB (1960-2016)
- Importación de archivos
- Descarga estos archivos
- Relación de concentración de CO2 y la anamolia de la temperatura media desde 1980 a 2016 en el mundo.
- PIB comparativo en 1980
- PIB comparativo en 2016
CASO DE ESTUDIO 11: Relación entre el cambio climatico y el desarrollo econónomico
Introducción
El cambio climático representa uno de los mayores retos civilizatorios que ha encarado la humanidad. Se trata de un problema que requiere de la colaboración entre el sector público y el privado para cambiar el modelo productivo hacia otro que garantice e impulse el desarrollo y el crecimiento económico sostenible. Además de su grave impacto sobre el medio ambiente y las personas, el cambio climático también es una de las mayores amenazas para la estabilidad económica. Las olas de calor decren la capacidad de trabajo y la productividad. Los huracanes, ciclones y tifones dejan a millones de personas en la más absoluta pobreza tras arrasar poblaciones con total indiferencia. Y las sequías reducen las cosechas, dificultando cada vez más la ardua tarea de alimentar a una población mundial.
¿El cambio climático afecta de igual forma a todos los países?
El cambio climático es un problema real para todo el planeta, pero no todo el mundo sufre sus consecuencias de la misma maner, esto depende de las características geográficas y socio-económicas. Las naciones en vías de desarrollo presentan muchos más problemas para hacer frente a crisis relacionadas con el clima: muchos no cuentan con infraestructuras suficientes, sus servicios de rescate y emergencias no tienen la capacidad necesaria y su capacidad de regeneración económica y social post-desastre es muy inferior al de países plenamente industrializados.
El cambio climático causado por los gases contaminantes está provocando que haya más sequías, más inundaciones. Todos estos desastres naturales son un elemento importantísimo que afecta a muchísimos productores y productoras locales, que dependen de sus cosechas para poder subsistir y mantener unos ingresos mínimos con los que alimentar a sus familias.
El rencarecimiento del precio de los alimentos, agrava todavía más la desigualdad social que existe en el mundo. Si aumenta el riesgo de olas de calor, de sequías o de inundaciones, es más probable que se pierdan más cosechas y, por tanto, que suba el precio de la comida.También daña infraestructuras, viviendas o limita el acceso a servicios básicos, como agua potable, así como además puede afectar a nuestra salud, al influir sobre la estacionalidad de enfermedades contagiosas.
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","hpackedbubble")temperatura <- read.csv("Temperatura.csv")
PIB <- read.csv("PIBmex.csv")
CO2 <- read_excel("CO2PIB.xlsx")Variación de CO2 vs PIB (1960-2016)
datos <- data.frame(CO2)
datos1 <- datos %>%
ggplot(aes(x = Año, y = CO2, size = PIB)) +
geom_point(alpha = 0.6)+
scale_size_continuous(range = c(1,7))+
labs(x = "Año" , y = "CO2 (toneladas per capital)", size = "PIB")+
ggtitle("Niveles de CO2 vs Producto Interno Bruto (PIB)") +
scale_y_continuous(labels = comma)
ggplotly(datos1)- El CO2 ha ido aumentando, representando una problematica en el impacto del ambiente.
Importación de archivos
GDP <- read_excel("GDP.xlsx")
TEMP <- read.csv("TEMPERATURA2.csv")
CO2 <- read.csv("co2-concentration.csv")
GDP2 <- read_excel("GDP2.xlsx")
GDP3 <- read_excel("GDP3.xlsx")
CO2T <- read_excel("co2.temp.xlsx")Descarga estos archivos
xfun::embed_file("GDP.xlsx")xfun::embed_file("TEMPERATURA.csv")xfun::embed_file("co2-concentration.csv")Download co2-concentration.csv
xfun::embed_file("co2.temp.xlsx")Relación de concentración de CO2 y la anamolia de la temperatura media desde 1980 a 2016 en el mundo.
CO2T %>%
ggplot(aes(x=`Temperature anomaly`, y=`CO2 concentrations`, size=Year, color=Year)) +
geom_point(alpha=0.4)+
scale_size_continuous(range = c(1, 7))+
labs(x="Anomalia de temperatura (°C)", y="Concentración de CO2 (ppm)", size="Año",color="Temperatura")
- Se observa como es que se relaciona el aumento de la concentración de CO2 con la anomalia de temperatura que se genera cada año.
PIB comparativo en 1980
hpackedbubble(GDP3$Continente, GDP3$País, GDP3$GDP,
title = "Distribucion mundial del PIB (1980)",
pointFormat = "<b>{point.name}:</b> {point.y}dolars PIB<sub>2</sub>",
dataLabelsFilter = 100,
packedbubbleMinSize = "50%",
packedbubbleMaxSize = "250%",
theme = "sunset",
packedbubbleZMin = 0,
packedbubbleZmax = 10000, split = 0,
gravitational = 0.05,
parentNodeLimit = 1,
dragBetweenSeries = 0,
width = "100%")- Durante este año, Japón y el Reino Unido tuvieron valores cercanos, y se observa como Africa tiene un PIB menor a diferencia a los demás países.
PIB comparativo en 2016
hpackedbubble(GDP2$Continente, GDP2$País, GDP2$GDP,
title = "Distribucion mundial del PIB (2016)",
pointFormat = "<b>{point.name}:</b> {point.y}dolars PIB<sub>2</sub>",
dataLabelsFilter = 100,
packedbubbleMinSize = "50%",
packedbubbleMaxSize = "250%",
theme = "sunset",
packedbubbleZMin = 0,
packedbubbleZmax = 10000, split = 0,
gravitational = 0.05,
parentNodeLimit = 1,
dragBetweenSeries = 0,
width = "100%")- Se observa como Africa se mantiene con un PIB menor al resto del mundo, y como los países de Norte Americanos siguen en ventaja.
Conclusión
Como se pudo observar, el CO2 han aumentado año tras año significativamente, lo cual causa un gran incertidumbre hacia la economía global y de nuesro país, ya que en México una de sus principales actividades económicas es la agricultura, la cual es fundamental para la seguridad alimentaria y la evolución de la pobreza.El aumento de la temperatura media global reduce la precipitación e incide en la ocurrencia de eventos climáticos extremos, lo cual reduce la productividad agrícola y sus ingresos, esto conlleva a la reducción en la oferta de alimentos y al aumento de sus precios; como una de las recomendaciones que se pudiera ofrecer para este suceso es asegurar los cultivos ante eventos climáticos extremos, elaborar un plan agropecuario que incluya actividades pecuarias, promover el cambio de cultivos, de localización geográfica y temporalidad, que incluya el uso de nuevos fertilizantes, especies de cultivos, control de plagas y nuevas tecnologías, entre otros.
Como sociedad debemos de hacer un cambio pero esto depende de una voluntad de los países por frenar las causas que ocasionan el cambio climático, de emitir menos gases contaminantes, de dejar de generar plástico, de utilizar energías limpias y renovables. Esto podría generar un planeta más limpio a las próximas generaciones,p ero el daño económico puede que ya sea irreversible.