A continuación, se presentan los datos del recorrido de medición de decibeles realizado el 1 de febrero de 2026 en la zona de San Pedro Cali, Valle del Cauca. Estos datos fueron obtenidos mediante la aplicación AirCasting, lo que permitió registrar las coordenadas geográficas de cada punto muestreado.
##Verificar el tipo de dato
library(readr)
Test_Bioestadi_stica <- read_csv("~/Desktop/Test Bioestadística.csv", skip = 8)
require(leaflet)
leaflet() %>% addTiles() %>%
addCircleMarkers(lng = Test_Bioestadi_stica$Longitude, lat = Test_Bioestadi_stica$Latitude)
En el mapa se observa la trayectoria del recorrido, la cual corresponde a la Pérgola Clandestina.
A continuación, se realizará un análisis exploratorio de los niveles de ruido registrados durante la jornada nocturna.
##Crear un campo hipotetico que se llama jornada=dia o noche
jornada=c(rep("dia", 774), rep("noche",775))
Test_Bioestadi_stica$jornada=jornada
##Verificar el tipo de dato
require(table1)
table1(~ `1:Measurement_Value` | jornada,data = Test_Bioestadi_stica)
| dia (N=774) |
noche (N=775) |
Overall (N=1549) |
|
|---|---|---|---|
| 1:Measurement_Value | |||
| Mean (SD) | 80.8 (2.38) | 80.6 (2.34) | 80.7 (2.36) |
| Median [Min, Max] | 80.7 [73.0, 87.9] | 80.6 [73.3, 87.5] | 80.6 [73.0, 87.9] |
Como se puede observar en la tabla, los niveles de ruido promedio son de 80.8 y 2.38 para la jornada diurna y 80.6 y 2.34 para la jornada nocturna; siendo la diferencia entre ambas jornadas de 0.2, lo que indica una variación mínima.
require(ggplot2)
ggplot(data=Test_Bioestadi_stica, aes(x=`1:Measurement_Value`))+geom_histogram(fill="blue")
El histograma muestra una distribución aproximadamente simétrica de los niveles de ruido, con valores concentrados principalmente entre 78 y 83 dB. La distribución presenta una forma cercana a la normalidad, con un valor central alrededor de 80 dB, lo que indica estabilidad en las mediciones registradas.
ggplot(data = Test_Bioestadi_stica, aes(x = jornada, y = `1:Measurement_Value`, fill = jornada)) +geom_boxplot()
El diagrama de cajas muestra que los niveles de presión sonora presentan medianas muy similares entre la jornada diurna y nocturna. Asimismo, la dispersión de los datos es comparable en ambos grupos. Aunque se observan algunos valores atípicos, no se evidencian diferencias marcadas entre las jornadas.
Con fines metodológicos y para ilustrar la comparación entre grupos en el análisis, se creó una variable categórica denominada jornada con dos niveles (día y noche). Sin embargo, es importante señalar que todas las mediciones fueron realizadas en horario nocturno.