U1A13

EQUIPO 6: Angélica Payán Serna, Karen Gutiérrez Velásquez y Andrea Higuera Chávez

07/03/2021


8vo CASO DE ESTUDIO: ANÁLISIS SOBRE LA SOSTENIBILIDAD EN SONORA

Descarga de este código

xfun::embed_file("U1A13.Rmd")

Download U1A13.Rmd

Acerca de este documento

  • El efecto invernadero es el fenómeno por el que la energía solar recibida en cada momento por la Tierra que proviene de la radiación solar natural no puede volver al espacio. Dichos gases deterioran las partículas de la capa de ozono, responsables de protegernos de la radiación, hasta generar enormes agujeros por los que penetran con mayor intensidad los rayos del sol.

  • Sonora es una de las entidades que a nivel nacional genera más emisiones de gases de efecto invernadero per cápita por habitante, debido a factores como el uso individual de automóviles, gasto de energía eléctrica por enfriamiento del hogar y uso de combustibles fósiles, entre otros.

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")

Importación de datos

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

Graficación de la concentración de Gases Efecto Invernadero en Sonora

ggplotly(ggplot(CO2, aes(y=MtCO2, x=AÑO))+
  geom_bar(position="dodge", stat="identity")+
  labs(x="AÑO", y="Millones de Toneladas de CO2", title="Concentración de Gases Efecto Invernadero (GEI) en Sonora", subtitle="Fuente: SIAP")+
      theme(axis.text.x = element_text(angle=90,hjust=1),axis.text.y =element_text(size = 6)))

En Sonora, durante 2020, se estima que se generen 23.7 millones de toneladas de dióxido de carbono equivalente de gases de efecto invernadero; 10.4 millones de toneladas de dióxido de carbono más que los que se reportaron en el año 2000.

CONCLUSIÓN

  • Este estudio nos permite conocer cuanto se emite de O2, y por lo tanto definir que impacto tiene y así poder tomar las medidas necesarias para disminuirlo e implementar políticas públicas requeridas y proporcionar datos básicos para la investigación ambiental.

  • Es por eso que el Gobierno estatal ha diseñado una serie de soluciones o iniciativas que han impulsado, por ejemplo, la eficiencia energética, para lo cual tienen un programa llamado Acelerador de Eficiencia Energética con el que se busca que se cambien los reglamentos de construcción municipal para que las nuevas edificaciones tengan una estructura que haga que el enfriarlo sea más fácil.

Bibliografía