data("airquality")
summary(airquality)
##      Ozone           Solar.R           Wind             Temp      
##  Min.   :  1.00   Min.   :  7.0   Min.   : 1.700   Min.   :56.00  
##  1st Qu.: 18.00   1st Qu.:115.8   1st Qu.: 7.400   1st Qu.:72.00  
##  Median : 31.50   Median :205.0   Median : 9.700   Median :79.00  
##  Mean   : 42.13   Mean   :185.9   Mean   : 9.958   Mean   :77.88  
##  3rd Qu.: 63.25   3rd Qu.:258.8   3rd Qu.:11.500   3rd Qu.:85.00  
##  Max.   :168.00   Max.   :334.0   Max.   :20.700   Max.   :97.00  
##  NA's   :37       NA's   :7                                       
##      Month            Day      
##  Min.   :5.000   Min.   : 1.0  
##  1st Qu.:6.000   1st Qu.: 8.0  
##  Median :7.000   Median :16.0  
##  Mean   :6.993   Mean   :15.8  
##  3rd Qu.:8.000   3rd Qu.:23.0  
##  Max.   :9.000   Max.   :31.0  
##

Interpretación.

En la anterior tabla se presentan las estadísticas descriptivas asociadas a la calidad del aire en estados unidos.

hist(airquality$Ozone, col="red")

hist(airquality$Solar.R, col="blue")

hist(airquality$Wind, col="green")

hist(airquality$Temp, col="skyblue")

interpretacion HISTOGRAMAS

El grafico #1 representa el histograma de la variable nivel de ozono, el cual presenta datos atipicos en valores elevados.

El grafico #2 representa el histograma de la variable Radiacion, cual presenta un promedio cercano a 200.

El grafico #3 representa el histograma ded la variable velocidad del viento, donde su promedio se ubica cerca a 10.

El grafico #4 representa el histograma de la variable temperatura, donde el promedio se ubica cerca a los 80 grados.

Graficos de Correlación (Dispersión).

plot(airquality$Ozone, airquality$Temp, col="blue")

data2 = na.omit(airquality)
cor(data2$Ozone, data2$Temp)
## [1] 0.6985414

Se observa una correlación moderada entre el nivel de Ozono y la temperatura, esta correlación es de 0.6985, lo cuál indica que a mayor nivel de Ozono mayor Temperatura.

IMAGEN

Caption
Caption