1 Monitoramento da Av. Independência durante a implantação de faixa exclusiva da ônibus
2 Manhã
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.
2.1 Velocidades médias no sistema Av. Independência no pico da manhã
2.1.1 Registros de 21/10/2019 a 26/01/2020 (Dias úteis)
O sistema é constituído pelas seguintes vias: Av. Independência - Pista Dir., Av. Independência, R. Sarmento Leite, R. Prof. Annes Dias, R. Tomaz Flores, R. Santo Antônio, R. Garibaldi, Av. Osvaldo Aranha, R. Mostardeiro
Os dados permitem demonstrar a existência de uma correlação positiva. de 0.1610882 entre a variação das velocidades médias associadas a Av. Independência e o sistema Av. Independência, indicando fraca associação entre os dois cenários. Ainda a aplicação de uma regressão linear entre as velocidades médias diárias na Av. Independência demonstra que apenas 0.57% da variação no sistema Av. Independência é explicado pela velocidade da Av. Independência a um P-valor de 0.264.
##
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.888 -1.188 0.354 1.283 2.811
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 9.66227 0.92089 10.492 0.0000000000000513 ***
## speedKMH.y 0.09892 0.08748 1.131 0.264
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.568 on 48 degrees of freedom
## Multiple R-squared: 0.02595, Adjusted R-squared: 0.005657
## F-statistic: 1.279 on 1 and 48 DF, p-value: 0.2637
2.2 Mapa de filas no pico da manhã
Foram identificados no período da manhã 23 alertas de filas na Av. Independência entre os dias 21/10/2019 e 26/01/2020, utilizando registros de 42 wazers.
2.3 Desempenho
2.4 ANOVA Manhã
##
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = as)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.2962 -0.9270 0.1707 0.8442 6.9188
##
## Coefficients:
## Estimate Std. Error t value
## (Intercept) 10.45951 0.31498 33.207
## periodoJuncAv. Independência Após -0.45833 0.39758 -1.153
## periodoJuncSistema Antes 0.75175 0.44545 1.688
## periodoJuncSistema Após 0.07333 0.39758 0.184
## Pr(>|t|)
## (Intercept) <0.0000000000000002 ***
## periodoJuncAv. Independência Após 0.2505
## periodoJuncSistema Antes 0.0932 .
## periodoJuncSistema Após 0.8539
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.863 on 184 degrees of freedom
## Multiple R-squared: 0.04829, Adjusted R-squared: 0.03278
## F-statistic: 3.112 on 3 and 184 DF, p-value: 0.02758## Analysis of Variance Table
##
## Response: speedKMH.x
## Df Sum Sq Mean Sq F value Pr(>F)
## periodoJunc 3 32.42 10.8073 3.1123 0.02758 *
## Residuals 184 638.93 3.4725
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1##
## Shapiro-Wilk normality test
##
## data: resid(modelo.anova2)
## W = 0.96175, p-value = 0.00005409## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 3 1.6835 0.1721
## 184
## Tukey multiple comparisons of means
## 95% family-wise confidence level
##
## Fit: aov(formula = speedKMH.x ~ periodoJunc, data = as)
##
## $periodoJunc
## diff lwr upr
## Av. Independência Após-Av. Independência Antes -0.45833156 -1.4891194 0.5724563
## Sistema Antes-Av. Independência Antes 0.75175170 -0.4031536 1.9066570
## Sistema Após-Av. Independência Antes 0.07332638 -0.9574615 1.1041142
## Sistema Antes-Av. Independência Após 1.21008326 0.1792954 2.2408711
## Sistema Após-Av. Independência Após 0.53165793 -0.3578593 1.4211752
## Sistema Após-Sistema Antes -0.67842533 -1.7092132 0.3523625
## p adj
## Av. Independência Após-Av. Independência Antes 0.6572947
## Sistema Antes-Av. Independência Antes 0.3331449
## Sistema Após-Av. Independência Antes 0.9977666
## Sistema Antes-Av. Independência Após 0.0141381
## Sistema Após-Av. Independência Após 0.4101641
## Sistema Após-Sistema Antes 0.32329152.4.1 Velocidades Praticadas
No cenário da MANHÃ no período anterior a 21/10/2019 a velocidade média em momentos de congestionamento na Av. Independência foi de 10.4595095, com erro padrão de 0.2503874 e no período posterior a velocidade média no trecho foi de 10.001178, com erro padrão de 0.2688937.
o p-valor=0.0000541 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.1721071 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:
2.5 Transporte Público
Relativamente ao transporte público foram extraídas amostras das velocidades e tempos de viagem nos picos da manhã e tarde no trecho que constitui os 500 metros que antecedem a Faixa Priooritária [Rua dos Andradas, 12 | Av. Independência 343] e o trecho de 1400 metros que compõe o trecho de faixa exclusiva [Av. Independência 343 e Rua Mostardeiro 333].
2.5.1 Avaliação da velocidade média:
2.5.2 Tempo de Percurso:
Tempo geral
3 Tarde
3.1 Velocidades médias no sistema Av. Independência no pico da tarde
Os dados permitem demonstrar a existência de uma correlação positiva de 0.1610882 entre a variação das velocidades médias associadas a Av. Independência e o sistema Av. Independência, indicando fraca associação entre os dois cenários. Ainda a aplicação de uma regressão linear entre as velocidades médias diárias na Av. Independência demonstra que apenas 2.82% da variação no sistema Av. Independência é explicado pela velocidade da Av. Independência a um P-valor de 0.072.
##
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.8403 -0.9132 -0.1756 0.8387 2.7434
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 7.0762 1.0070 7.027 0.000000000664 ***
## speedKMH.y 0.1842 0.1010 1.823 0.072 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.269 on 79 degrees of freedom
## Multiple R-squared: 0.04039, Adjusted R-squared: 0.02824
## F-statistic: 3.325 on 1 and 79 DF, p-value: 0.07202
3.2 Mapa de filas no pico da TARDE
3.3 Registros de 21/10/2019 a 26/01/2020 (Dias úteis)
Foram identificados no período da tarde 177 alertas de filas na Av. Independência entre os dias 21/10/2019 e 26/01/2020, utilizando registros de 269 wazers.
3.4 Desempenho
3.5 ANOVA Tarde
##
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = bs)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.7846 -0.8918 0.0407 0.8386 4.1180
##
## Coefficients:
## Estimate Std. Error t value
## (Intercept) 9.9452 0.2270 43.811
## periodoJuncAv. Independência Após -0.1161 0.2816 -0.412
## periodoJuncSistema Antes -0.1397 0.3210 -0.435
## periodoJuncSistema Após -1.1899 0.2816 -4.226
## Pr(>|t|)
## (Intercept) < 0.0000000000000002 ***
## periodoJuncAv. Independência Após 0.680
## periodoJuncSistema Antes 0.664
## periodoJuncSistema Após 0.0000364 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.343 on 196 degrees of freedom
## Multiple R-squared: 0.131, Adjusted R-squared: 0.1177
## F-statistic: 9.848 on 3 and 196 DF, p-value: 0.000004431## Analysis of Variance Table
##
## Response: speedKMH.x
## Df Sum Sq Mean Sq F value Pr(>F)
## periodoJunc 3 53.29 17.7622 9.8482 0.000004431 ***
## Residuals 196 353.50 1.8036
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1##
## Shapiro-Wilk normality test
##
## data: resid(modelo.anova2)
## W = 0.98761, p-value = 0.07862## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 3 0.7713 0.5113
## 196
## Tukey multiple comparisons of means
## 95% family-wise confidence level
##
## Fit: aov(formula = speedKMH.x ~ periodoJunc, data = bs)
##
## $periodoJunc
## diff lwr
## Av. Independência Após-Av. Independência Antes -0.11614559 -0.8457392
## Sistema Antes-Av. Independência Antes -0.13969473 -0.9715595
## Sistema Após-Av. Independência Antes -1.18990153 -1.9194952
## Sistema Antes-Av. Independência Após -0.02354914 -0.7531428
## Sistema Após-Av. Independência Após -1.07375594 -1.6841778
## Sistema Após-Sistema Antes -1.05020680 -1.7798005
## upr p adj
## Av. Independência Após-Av. Independência Antes 0.6134481 0.9762697
## Sistema Antes-Av. Independência Antes 0.6921700 0.9723435
## Sistema Após-Av. Independência Antes -0.4603079 0.0002121
## Sistema Antes-Av. Independência Após 0.7060445 0.9997896
## Sistema Após-Av. Independência Após -0.4633341 0.0000534
## Sistema Após-Sistema Antes -0.3206131 0.00142183.5.1 Velocidades Praticadas
No cenário da TARDE no período anterior a 21/10/2019 a velocidade média em momentos de congestionamento na Av. Independência foi de 9.9452334, com erro padrão de 0.1873663 e no período posterior a velocidade média no trecho foi de 9.8290878, com erro padrão de 0.1668557. o p-valor=0.0786227 do teste Shapiro atesta que as distribuições amostrais no período da MANHÃ seguem distribuições normais, enquanto que o teste de Levene com p-valor=0.5113199 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:
3.6 Transporte Público
3.6.1 Avaliação da velocidade média:
3.6.2 Tempo de Percurso:
Tempo geral
4 Entre Picos
4.1 Mapa de filas no entre picos
4.2 Registros de 21/10/2019 a 26/01/2020 (Dias úteis)
Foram identificados no período de entre picos 180 alertas de filas na Av. Independência entre os dias 21/10/2019 e 26/01/2020, utilizando registros de 244 wazers.
## R version 3.6.2 (2019-12-12)
## Platform: x86_64-w64-mingw32/x64 (64-bit)
## Running under: Windows 10 x64 (build 18363)
##
## Matrix products: default
##
## locale:
## [1] LC_COLLATE=Portuguese_Brazil.1252 LC_CTYPE=Portuguese_Brazil.1252
## [3] LC_MONETARY=Portuguese_Brazil.1252 LC_NUMERIC=C
## [5] LC_TIME=Portuguese_Brazil.1252
##
## attached base packages:
## [1] stats graphics grDevices utils datasets methods base
##
## other attached packages:
## [1] xlsx_0.6.1 ggpmisc_0.3.3 ggplot2_3.2.1 stringr_1.4.0 chron_2.3-54
## [6] mapview_2.7.0 sp_1.3-2 tidyr_1.0.0 dplyr_0.8.3 jsonlite_1.6
## [11] car_3.0-6 carData_3.0-3
##
## loaded via a namespace (and not attached):
## [1] sf_0.8-0 satellite_1.0.2 webshot_0.5.2
## [4] tools_3.6.2 backports_1.1.5 R6_2.4.1
## [7] KernSmooth_2.23-16 DBI_1.1.0 lazyeval_0.2.2
## [10] colorspace_1.4-1 raster_3.0-7 withr_2.1.2
## [13] tidyselect_0.2.5 leaflet_2.0.3 curl_4.3
## [16] compiler_3.6.2 leafem_0.0.1 labeling_0.3
## [19] scales_1.1.0 classInt_0.4-2 systemfonts_0.1.1
## [22] digest_0.6.23 foreign_0.8-72 rmarkdown_2.0
## [25] svglite_1.2.2 rio_0.5.16 base64enc_0.1-3
## [28] pkgconfig_2.0.3 htmltools_0.4.0 fastmap_1.0.1
## [31] htmlwidgets_1.5.1 rlang_0.4.2 readxl_1.3.1
## [34] shiny_1.4.0 farver_2.0.1 crosstalk_1.0.0
## [37] zip_2.0.4 magrittr_1.5 polynom_1.4-0
## [40] Rcpp_1.0.3 munsell_0.5.0 abind_1.4-5
## [43] gdtools_0.2.1 lifecycle_0.1.0 stringi_1.4.4
## [46] yaml_2.2.0 plyr_1.8.5 grid_3.6.2
## [49] promises_1.1.0 forcats_0.4.0 crayon_1.3.4
## [52] lattice_0.20-38 haven_2.2.0 xlsxjars_0.6.1
## [55] hms_0.5.3 leafpop_0.0.5 zeallot_0.1.0
## [58] knitr_1.26 pillar_1.4.3 uuid_0.1-2
## [61] reshape2_1.4.3 codetools_0.2-16 stats4_3.6.2
## [64] glue_1.3.1 evaluate_0.14 leaflet.providers_1.9.0
## [67] data.table_1.12.8 png_0.1-7 vctrs_0.2.1
## [70] httpuv_1.5.2 cellranger_1.1.0 gtable_0.3.0
## [73] purrr_0.3.3 assertthat_0.2.1 xfun_0.11
## [76] openxlsx_4.1.4 mime_0.8 xtable_1.8-4
## [79] e1071_1.7-3 later_1.0.0 class_7.3-15
## [82] viridisLite_0.3.0 tibble_2.1.3 rJava_0.9-11
## [85] units_0.6-5 brew_1.0-6