Toma de datos y Ubicación

Los siguientes datos se tomaron en la unidad residencial Cascadas IV, Valle del Cauca, Cali, para hacer un pequeño análisis sobre el nivel de sonido en decibeles (dB) que hay en en uno de los cuartos de uno de los apartamentos que dan hacia la piscina.

library(readr)
micuarto <- read_csv("~/Downloads/micuarto.csv", skip = 8)

require(leaflet)
leaflet() %>% addTiles() %>% addCircleMarkers(lng = micuarto$Longitude, lat = micuarto$Latitude)

Se observa la ubicación exacta tanto de la unidad como del cuarto, el cual esta ubicado en la zona interior de la unidad.

Exploración de Datos

La siguiente información muestra los datos que se obtuvieron en dos jornadas (día y noche). Después de presentar los datos se harán algunos análisis con base en los resultados.

(Tabla 1)

n = round(dim(micuarto)[1]/2,0)

jornada = c(rep("Día", n), rep("Noche", n-1))

micuarto$jornada=jornada

library(table1)

table1(~`1:Measurement_Value`|jornada,data = micuarto)
Día
(N=468)		 Noche
(N=467)		 Overall
(N=935)
1:Measurement_Value
Mean (SD) 36.4 (5.18) 36.9 (3.82) 36.6 (4.55)
Median [Min, Max] 34.9 [30.1, 62.6] 36.1 [30.0, 71.1] 35.7 [30.0, 71.1]

En esta tabla se observa la media y la mediana de los dB tanto en el día como en la noche.

(Gráfica 1)

library(ggplot2)

ggplot(data = micuarto,aes(x=`1:Measurement_Value`)) + geom_histogram(fill="darkgreen")

En esta gráfica se puede observar el histograma de distribución de los valores (dB), en donde el eje X muestra el nivel de sonido en dB y el eje Y muestra la frecuencia en la que aparece ese nivel de sonido (cuántas mediciones caen dentro de cada intervalo).

(Gráfica 2)

require(ggplot2)
ggplot(data=micuarto,aes(x= jornada, y= `1:Measurement_Value`, fill= jornada )) + geom_boxplot()

Esta es la gráfica del diagrama de caja y bigotes (boxplot), en esta se observa en el eje X las jornadas del día y la noche, mientras que en el eje Y se observan los valores del nivel de sonido en dB.

Análisis de los datos

Con la tabla 1 se puede observar que con base a los 935 datos, 468 de día y 467 de noche; se obtuvo un promedio general de 36.6 dB en el que de día fue de 36.4 dB y 36.9 dB en la noche, es decir que en promedio la noche obtuvo un promedio de dB un poco mayor comparado con el día, sin embargo; esto no representa un cambio tan considerable, ya que es una diferencia de aproximadamente 0.5 dB. En cuanto a la mediana, esta muestra el mismo comportamiento, una pequeña diferencia entre el día y la noche.

En cuanto al histograma (gráfica 1), se observa que la mayoría de los datos están concentrados aproximadamente entre los 34 y 38 dB estos datos muestran que en este cuarto se mantiene un ambiente tranquilo, en donde la mayoría de los datos muestran niveles bajos de ruido (dB) y los datos mas cercanos a la derecha representan eventos específicos que generaron mas ruido de lo normal.

Finalmente con la gráfica 2 de caja y bigotes se confirma que la mediana de ambas jornadas esta en un rango cercano, pero también se puede observar la dispersión, en este caso la caja del día muestra mas cambios, pues se puede ver una caja un poco mas amplia, osea que en el día el sonido fluctuó mas que en la noche en donde los datos están mas compactos osea fluctuó menos el ruido. Es importante resaltar que en la noche si hubo cambios en el ruido de la habitación pero estos son muy específicos por lo que se puede atribuir a eventos específicos.

Conclusión

Después de observar y analizar los datos se puede concluir que ambas jornadas son bastante tranquilas en cuanto al ruido que llega al cuarto, aunque se mantienen unos niveles bajos en cuanto a los dB hay algunos eventos específicos en los que estos suben bastante, lo que se puede atribuir probablemente a vivir en proximidad a una avenida principal y en general en una unidad residencial.