U1A7

U1A7 ANÁLISIS DE CALIDAD DEL AIRE

IMPORTAR DATOS

library(pacman)
p_load("readr","tidyverse","DT","prettydoc")

Datos de calidad de conntaminantes atmosfericos de ozono y oxido nitroso de la estacion ERNO (UNAM en Hermosillo) para Maro de 2020.

datos <- read.csv("aire.csv")

Visualización de datos

Tabla

datatable(datos)

### Gráfico

O3 <- datos$O3
NO2 <- datos$NO2


aire <- data.frame(O3,NO2)
pairs(aire)

Analisis de correlación

cor(aire)

##            O3       NO2
## O3  1.0000000 0.1882128
## NO2 0.1882128 1.0000000

Tarea P/otros mes

Para julio

Datos de calidad de conntaminantes atmosfericos de ozono y oxido nitroso de la estacion ERNO (UNAM en Hermosillo) para julio de 2020.

datos1 <- read.csv("Aire1.csv")

Visualización de datos

Tabla

datatable(datos1)

Gráfico

O31 <- datos$O3
NO21 <- datos$NO2


aire1 <- data.frame(O31,NO21)
pairs(aire)

Analisis de correlación

cor(aire1)

##            O31      NO21
## O31  1.0000000 0.1882128
## NO21 0.1882128 1.0000000