Dados Waze e sua representação:
Os traçados representam filas de lentidão baseadas na localização e velocidade dos usuários do Waze.
O Waze gera informações de congestionamento de tráfego processando as seguintes fontes de dados:
● Pontos de localização GPS enviados pelos telefones dos usuários (usuários que dirigem enquanto usam o aplicativo) e cálculos da velocidade real vs. velocidade média (no intervalo de tempo específico) e velocidade livre de fluxo (velocidade máxima medida no segmento da via).
● Os dados de velocidade média por trecho são dados pela Velocidade média atual em segmentos congestionados em metros/segundos.
Registros de 29/05/2019 a 20/12/2022 (Dias úteis)
O sistema é constituído pelas seguintes vias: Av. Júlio de Castilhos, Av. Júlio de Castilhos - Pista Dir., Av. Júlio de Castilhos - Pista Esq., R. da Conceição, Túnel da Conceição
Os dados permitem demonstrar a existência de uma correlação positiva. de 0.762746 entre a variação das velocidades médias associadas a R. da Conceição e o sistema R. da Conceição, indicando forte associação entre os dois cenários. Ainda a aplicação de uma regressão linear entre as velocidades médias diárias na R. da Conceição demonstra que apenas 52.2% da variação no sistema R. da Conceição é explicado pela velocidade da R. da Conceição a um P-valor de 0.017.
##
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.3963 -1.9952 0.2506 1.0107 6.9475
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -2.233 3.527 -0.633 0.5468
## speedKMH.y 1.794 0.575 3.121 0.0168 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 3.377 on 7 degrees of freedom
## Multiple R-squared: 0.5818, Adjusted R-squared: 0.522
## F-statistic: 9.738 on 1 and 7 DF, p-value: 0.01683
Foram identificados no período da manhã 31 alertas de filas na R. da Conceição entre os dias 29/05/2019 e 20/12/2022, utilizando registros de 35 wazers.
##
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = as)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.4032 -0.4782 -0.0469 0.0808 9.4102
##
## Coefficients:
## Estimate Std. Error t value
## (Intercept) 5.99821 0.27541 21.779
## periodoJuncR. da Conceição Após -0.09097 0.38349 -0.237
## periodoJuncSistema Antes 1.63500 0.38950 4.198
## periodoJuncSistema Após 1.79160 0.38349 4.672
## Pr(>|t|)
## (Intercept) < 0.0000000000000002 ***
## periodoJuncR. da Conceição Após 0.813
## periodoJuncSistema Antes 0.00004174 ***
## periodoJuncSistema Após 0.00000571 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.868 on 186 degrees of freedom
## Multiple R-squared: 0.1861, Adjusted R-squared: 0.1729
## F-statistic: 14.17 on 3 and 186 DF, p-value: 0.00000002332
## Analysis of Variance Table
##
## Response: speedKMH.x
## Df Sum Sq Mean Sq F value Pr(>F)
## periodoJunc 3 148.37 49.455 14.174 0.00000002332 ***
## Residuals 186 649.00 3.489
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Shapiro-Wilk normality test
##
## data: resid(modelo.anova2)
## W = 0.83147, p-value = 0.0000000000001464
## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 3 4.5021 0.004481 **
## 186
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## Tukey multiple comparisons of means
## 95% family-wise confidence level
##
## Fit: aov(formula = speedKMH.x ~ periodoJunc, data = as)
##
## $periodoJunc
## diff lwr upr
## R. da Conceição Após-R. da Conceição Antes -0.09097493 -1.0851305 0.9031806
## Sistema Antes-R. da Conceição Antes 1.63500202 0.6252713 2.6447328
## Sistema Após-R. da Conceição Antes 1.79159707 0.7974415 2.7857526
## Sistema Antes-R. da Conceição Após 1.72597695 0.7318214 2.7201325
## Sistema Após-R. da Conceição Após 1.88257201 0.9042396 2.8609045
## Sistema Após-Sistema Antes 0.15659506 -0.8375605 1.1507506
## p adj
## R. da Conceição Após-R. da Conceição Antes 0.9952873
## Sistema Antes-R. da Conceição Antes 0.0002426
## Sistema Após-R. da Conceição Antes 0.0000337
## Sistema Antes-R. da Conceição Após 0.0000700
## Sistema Após-R. da Conceição Após 0.0000083
## Sistema Após-Sistema Antes 0.9769465
No cenário da MANHÃ no período anterior a 29/05/2019 a velocidade média em momentos de congestionamento na R. da Conceição foi de 5.998211, com erro padrão de 0.1372064 e no período posterior a velocidade média no trecho foi de 5.907236, com erro padrão de 0.2061884.
o p-valor=0 do teste Shapiro atesta que as distribuições amostrais no período da MANHÃ seguem distribuições não normais, enquanto que o teste de Levene com p-valor=0.0044808 demonstra que não há igualdade de variância entre as amostras, e por fim, o teste de Tukey demonstra a existencia de diferença entre as médias das amostras:
Performance do trecho entre EF06 - IGREJA UNIVERSAL - Av. Júlio de Castilhos, 609 - Centro Histórico, Porto Alegre - RS, 90030-000 e PO CAMPUS CENTRO UFRGS - Sarmento Leite - Centro Histórico, Porto Alegre - RS, 90050-200.
Performance do trecho entre EF06 - IGREJA UNIVERSAL - Av. Júlio de Castilhos, 609 - Centro Histórico, Porto Alegre - RS, 90030-000 e PO CAMPUS CENTRO UFRGS - Sarmento Leite - Centro Histórico, Porto Alegre - RS, 90050-200.
Performance do trecho entre EF06 - IGREJA UNIVERSAL - Av. Júlio de Castilhos, 609 - Centro Histórico, Porto Alegre - RS, 90030-000 e PO CAMPUS CENTRO UFRGS - Sarmento Leite - Centro Histórico, Porto Alegre - RS, 90050-200.
Os dados permitem demonstrar a existência de uma correlação positiva de 0.762746 entre a variação das velocidades médias associadas a R. da Conceição e o sistema R. da Conceição, indicando forte associação entre os dois cenários. Ainda a aplicação de uma regressão linear entre as velocidades médias diárias na R. da Conceição demonstra que apenas 13.28% da variação no sistema R. da Conceição é explicado pela velocidade da R. da Conceição a um P-valor de 0.005.
##
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
##
## Residuals:
## Min 1Q Median 3Q Max
## -7.2396 -1.3977 -0.6008 1.2031 5.8495
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 4.5764 1.2393 3.693 0.000567 ***
## speedKMH.y 0.5353 0.1836 2.916 0.005377 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.545 on 48 degrees of freedom
## Multiple R-squared: 0.1505, Adjusted R-squared: 0.1328
## F-statistic: 8.503 on 1 and 48 DF, p-value: 0.005377
Registros de 29/05/2019 a 20/12/2022 (Dias úteis) Foram identificados no período da tarde 49 alertas de filas na R. da Conceição entre os dias 29/05/2019 e 20/12/2022, utilizando registros de 57 wazers.
##
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = bs)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.9283 -1.0506 -0.1223 0.9456 6.3144
##
## Coefficients:
## Estimate Std. Error t value
## (Intercept) 7.0332 0.2462 28.570
## periodoJuncR. da Conceição Após -0.5524 0.3677 -1.502
## periodoJuncSistema Antes 0.9051 0.3481 2.600
## periodoJuncSistema Após 0.6324 0.3677 1.720
## Pr(>|t|)
## (Intercept) < 0.0000000000000002 ***
## periodoJuncR. da Conceição Após 0.13436
## periodoJuncSistema Antes 0.00994 **
## periodoJuncSistema Após 0.08680 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.969 on 228 degrees of freedom
## Multiple R-squared: 0.07575, Adjusted R-squared: 0.06359
## F-statistic: 6.229 on 3 and 228 DF, p-value: 0.0004398
## Analysis of Variance Table
##
## Response: speedKMH.x
## Df Sum Sq Mean Sq F value Pr(>F)
## periodoJunc 3 72.48 24.1602 6.2292 0.0004398 ***
## Residuals 228 884.30 3.8785
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Shapiro-Wilk normality test
##
## data: resid(modelo.anova2)
## W = 0.96639, p-value = 0.00002699
## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 3 1.0617 0.3661
## 228
## Tukey multiple comparisons of means
## 95% family-wise confidence level
##
## Fit: aov(formula = speedKMH.x ~ periodoJunc, data = bs)
##
## $periodoJunc
## diff lwr upr
## R. da Conceição Após-R. da Conceição Antes -0.5524233 -1.504009824 0.3991633
## Sistema Antes-R. da Conceição Antes 0.9051163 0.004093125 1.8061395
## Sistema Após-R. da Conceição Antes 0.6323860 -0.319200500 1.5839726
## Sistema Antes-R. da Conceição Após 1.4575396 0.505953045 2.4091261
## Sistema Após-R. da Conceição Após 1.1848093 0.185213844 2.1844048
## Sistema Após-Sistema Antes -0.2727303 -1.224316815 0.6788563
## p adj
## R. da Conceição Após-R. da Conceição Antes 0.4376987
## Sistema Antes-R. da Conceição Antes 0.0484951
## Sistema Após-R. da Conceição Antes 0.3156928
## Sistema Antes-R. da Conceição Após 0.0005680
## Sistema Após-R. da Conceição Após 0.0128402
## Sistema Após-Sistema Antes 0.8800881
No cenário da TARDE no período anterior a 29/05/2019 a velocidade média em momentos de congestionamento na R. da Conceição foi de 7.0332089, com erro padrão de 0.197271 e no período posterior a velocidade média no trecho foi de 6.4807856, com erro padrão de 0.2554207. o p-valor=0.000027 do teste Shapiro atesta que as distribuições amostrais no período da MANHÃ seguem distribuições não normais, enquanto que o teste de Levene com p-valor=0.366138 demonstra que há igualdade de variância entre as amostras, e por fim, o teste de Tukey demonstra a existencia de diferença entre as médias das amostras:
Performance do trecho entre EF06 - IGREJA UNIVERSAL - Av. Júlio de Castilhos, 609 - Centro Histórico, Porto Alegre - RS, 90030-000 e PO CAMPUS CENTRO UFRGS - Sarmento Leite - Centro Histórico, Porto Alegre - RS, 90050-200.
Performance do trecho entre EF06 - IGREJA UNIVERSAL - Av. Júlio de Castilhos, 609 - Centro Histórico, Porto Alegre - RS, 90030-000 e PO CAMPUS CENTRO UFRGS - Sarmento Leite - Centro Histórico, Porto Alegre - RS, 90050-200.
Performance do trecho entre EF06 - IGREJA UNIVERSAL - Av. Júlio de Castilhos, 609 - Centro Histórico, Porto Alegre - RS, 90030-000 e PO CAMPUS CENTRO UFRGS - Sarmento Leite - Centro Histórico, Porto Alegre - RS, 90050-200.
Registros de 29/05/2019 a 20/12/2022 (Dias úteis)
Foram identificados no período de entre picos 28 alertas de filas na R. da Conceição entre os dias 29/05/2019 e 20/12/2022, utilizando registros de 28 wazers.
## R version 3.6.2 (2019-12-12)
## Platform: x86_64-pc-linux-gnu (64-bit)
## Running under: Debian GNU/Linux 10 (buster)
##
## Matrix products: default
## BLAS/LAPACK: /usr/lib/x86_64-linux-gnu/libopenblasp-r0.3.5.so
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8
## [5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=C
## [7] LC_PAPER=en_US.UTF-8 LC_NAME=C
## [9] LC_ADDRESS=C LC_TELEPHONE=C
## [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
##
## attached base packages:
## [1] stats graphics grDevices utils datasets methods base
##
## other attached packages:
## [1] data.table_1.14.2 sf_1.0-7 hms_1.1.2 raster_3.5-15
## [5] ggpmisc_0.4.0 ggpp_0.4.1 ggplot2_3.3.6 stringr_1.4.1
## [9] chron_2.3-56 mapview_2.10.0 sp_1.5-0 tidyr_1.2.1
## [13] dplyr_1.0.10 jsonlite_1.8.0 car_3.0-11 carData_3.0-4
##
## loaded via a namespace (and not attached):
## [1] nlme_3.1-142 satellite_1.0.2 webshot_0.5.2
## [4] tools_3.6.2 bslib_0.4.0 utf8_1.2.2
## [7] rgdal_1.5-32 R6_2.5.1 KernSmooth_2.23-16
## [10] DBI_1.1.3 mgcv_1.8-31 colorspace_2.0-3
## [13] withr_2.5.0 tidyselect_1.1.2 leaflet_2.0.4.1
## [16] curl_4.3.2 compiler_3.6.2 leafem_0.1.6
## [19] cli_3.4.0 quantreg_5.93 SparseM_1.81
## [22] labeling_0.4.2 sass_0.4.2 scales_1.2.1
## [25] classInt_0.4-7 proxy_0.4-27 systemfonts_1.0.4
## [28] digest_0.6.29 foreign_0.8-72 svglite_2.0.0
## [31] rmarkdown_2.9 rio_0.5.27 base64enc_0.1-3
## [34] pkgconfig_2.0.3 htmltools_0.5.3 fastmap_1.1.0
## [37] highr_0.9 htmlwidgets_1.5.4 rlang_1.0.5
## [40] readxl_1.3.1 rstudioapi_0.14 jquerylib_0.1.4
## [43] generics_0.1.3 farver_2.1.1 crosstalk_1.1.1
## [46] zip_2.2.0 magrittr_2.0.3 polynom_1.4-0
## [49] Matrix_1.2-18 Rcpp_1.0.9 munsell_0.5.0
## [52] fansi_1.0.3 abind_1.4-5 lifecycle_1.0.2
## [55] terra_1.5-34 stringi_1.7.8 yaml_2.3.5
## [58] MASS_7.3-54 grid_3.6.2 forcats_0.5.1
## [61] lattice_0.20-38 haven_2.4.1 splines_3.6.2
## [64] leafpop_0.1.0 knitr_1.40 pillar_1.8.1
## [67] uuid_1.1-0 codetools_0.2-16 stats4_3.6.2
## [70] glue_1.6.2 evaluate_0.16 leaflet.providers_1.9.0
## [73] png_0.1-7 vctrs_0.4.1 MatrixModels_0.5-0
## [76] cellranger_1.1.0 gtable_0.3.1 purrr_0.3.4
## [79] assertthat_0.2.1 cachem_1.0.6 xfun_0.33
## [82] openxlsx_4.2.4 e1071_1.7-11 class_7.3-15
## [85] survival_3.3-1 tibble_3.1.8 units_0.8-0
## [88] brew_1.0-6 ellipsis_0.3.2