library(pacman)
p_load("readr","tidyverse","DT","prettydoc")
Datos de calidad del aire para los contaminantes atmosféricos O3 y NO2 de la estación ERNO de la UNAM en Hermosillo para el mes de Marzo de 2020
datos <-read_csv("C:/Users/erika/OneDrive/Documentos/Septimo Semestre/EstadisticaAplicada/Aire Junio 2020.csv")
## Warning: Missing column names filled in: 'X2' [2], 'X3' [3]
## Parsed with column specification:
## cols(
## `Periodo: 2020-06-01 12:00:00 a 2020-06-30 12:00:00` = col_character(),
## X2 = col_character(),
## X3 = col_character()
## )
datatable(datos)
O3 <- datos$X2
NO2 <- datos$X3
Aire <- data.frame(O3,NO2)
pairs(Aire)
# Análisis de correlación