1 Monitoramento R. Siqueira Campos durante a implantação de faixa exclusiva de ô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 R. Siqueira Campos no pico da manhã
Registros de 15/07/2020 a 02/08/2022 (Dias úteis)
O sistema é constituído pelas seguintes vias: R. Siqueira Campos, Av. Pres. João Goulart, Av. Júlio de Castilhos
Os dados permitem demonstrar a existência de uma correlação positiva. de 0.545841 entre a variação das velocidades médias associadas a R. Siqueira Campos e o sistema R. Siqueira Campos, 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 R. Siqueira Campos demonstra que apenas 15.75% da variação no sistema R. Siqueira Campos é explicado pela velocidade da R. Siqueira Campos a um P-valor de 0.205.
##
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
##
## Residuals:
## 3 19 48 66 98 133 134
## 6.5194 -10.6692 2.0107 -2.5286 -0.5396 1.2748 3.9326
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -3.399 11.521 -0.295 0.780
## speedKMH.y 1.724 1.183 1.457 0.205
##
## Residual standard error: 6.069 on 5 degrees of freedom
## Multiple R-squared: 0.2979, Adjusted R-squared: 0.1575
## F-statistic: 2.122 on 1 and 5 DF, p-value: 0.205
2.2 Mapa de filas no pico da manhã
Foram identificados no período da manhã 38 alertas de filas na R. Siqueira Campos entre os dias 15/07/2020 e 02/08/2022, utilizando registros de 49 wazers.
2.3 Desempenho
2.4 ANOVA Manhã
##
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = as)
##
## Residuals:
## Min 1Q Median 3Q Max
## -13.1452 -0.4485 0.2266 0.4375 6.0599
##
## Coefficients:
## Estimate Std. Error t value
## (Intercept) 9.94872 0.20253 49.12
## periodoJuncR. Siqueira Campos Após -0.03857 0.34960 -0.11
## periodoJuncSistema Antes 6.43644 0.28642 22.47
## periodoJuncSistema Após 7.11152 0.34960 20.34
## Pr(>|t|)
## (Intercept) <0.0000000000000002 ***
## periodoJuncR. Siqueira Campos Após 0.912
## periodoJuncSistema Antes <0.0000000000000002 ***
## periodoJuncSistema Após <0.0000000000000002 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.995 on 288 degrees of freedom
## Multiple R-squared: 0.7404, Adjusted R-squared: 0.7377
## F-statistic: 273.8 on 3 and 288 DF, p-value: < 0.00000000000000022## Analysis of Variance Table
##
## Response: speedKMH.x
## Df Sum Sq Mean Sq F value Pr(>F)
## periodoJunc 3 3268.4 1089.46 273.81 < 0.00000000000000022 ***
## Residuals 288 1145.9 3.98
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1##
## Shapiro-Wilk normality test
##
## data: resid(modelo.anova2)
## W = 0.81864, p-value < 0.00000000000000022## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 3 9.1449 0.000008452 ***
## 288
## ---
## 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
## R. Siqueira Campos Após-R. Siqueira Campos Antes -0.03857475 -0.9419785
## Sistema Antes-R. Siqueira Campos Antes 6.43643681 5.6962890
## Sistema Após-R. Siqueira Campos Antes 7.11152144 6.2081177
## Sistema Antes-R. Siqueira Campos Após 6.47501156 5.5716078
## Sistema Após-R. Siqueira Campos Após 7.15009619 6.1087232
## Sistema Após-Sistema Antes 0.67508463 -0.2283191
## upr p adj
## R. Siqueira Campos Após-R. Siqueira Campos Antes 0.864829 0.9995185
## Sistema Antes-R. Siqueira Campos Antes 7.176585 0.0000000
## Sistema Após-R. Siqueira Campos Antes 8.014925 0.0000000
## Sistema Antes-R. Siqueira Campos Após 7.378415 0.0000000
## Sistema Após-R. Siqueira Campos Após 8.191469 0.0000000
## Sistema Após-Sistema Antes 1.578488 0.21737012.4.1 Velocidades Praticadas
No cenário da MANHÃ no período anterior a 15/07/2020 a velocidade média em momentos de congestionamento na R. Siqueira Campos foi de 9.9487178, com erro padrão de 0.2117499 e no período posterior a velocidade média no trecho foi de 9.9101431, com erro padrão de 0.299948.
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.0000085 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:
2.5 Transporte Público
2.5.1 Linha: C3 - Circular Urca
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170.
2.5.2 Linha: 492 - PETRÓPOLIS / SESC
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170. 
2.5.3 Linha: 4332 - V. JARDIM VIA GASÔMETRO
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170. 
2.5.4 Linha: 188 - ASSUNÇÃO
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170. 
2.5.5 Todas Linhas: Faixa exclusiva Siqueira Campos
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170.
2.5.6 Comparativo
3 Tarde
3.1 Velocidades médias no sistema R. Siqueira Campos no pico da tarde
Os dados permitem demonstrar a existência de uma correlação positiva de 0.545841 entre a variação das velocidades médias associadas a R. Siqueira Campos e o sistema R. Siqueira Campos, 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 R. Siqueira Campos demonstra que apenas 15.19% da variação no sistema R. Siqueira Campos é explicado pela velocidade da R. Siqueira Campos a um P-valor de 0.
##
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
##
## Residuals:
## Min 1Q Median 3Q Max
## -11.477 -1.977 1.039 3.190 7.172
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 9.6192 1.4026 6.858 0.000000000729 ***
## speedKMH.y 0.6754 0.1591 4.245 0.000051347629 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 4.257 on 94 degrees of freedom
## Multiple R-squared: 0.1608, Adjusted R-squared: 0.1519
## F-statistic: 18.02 on 1 and 94 DF, p-value: 0.00005135
3.2 Mapa de filas no pico da TARDE
Registros de 15/07/2020 a 02/08/2022 (Dias úteis) Foram identificados no período da tarde 222 alertas de filas na R. Siqueira Campos entre os dias 15/07/2020 e 02/08/2022, utilizando registros de 269 wazers.
3.3 Desempenho
3.4 ANOVA Tarde
##
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = bs)
##
## Residuals:
## Min 1Q Median 3Q Max
## -12.3558 -0.4518 -0.3653 1.0141 7.0863
##
## Coefficients:
## Estimate Std. Error t value
## (Intercept) 7.7284 0.1997 38.693
## periodoJuncR. Siqueira Campos Após 1.1853 0.2401 4.936
## periodoJuncSistema Antes 7.9915 0.2825 28.291
## periodoJuncSistema Após 9.4574 0.2401 39.383
## Pr(>|t|)
## (Intercept) < 0.0000000000000002 ***
## periodoJuncR. Siqueira Campos Após 0.000000943 ***
## periodoJuncSistema Antes < 0.0000000000000002 ***
## periodoJuncSistema Após < 0.0000000000000002 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.422 on 950 degrees of freedom
## Multiple R-squared: 0.7458, Adjusted R-squared: 0.745
## F-statistic: 928.9 on 3 and 950 DF, p-value: < 0.00000000000000022## Analysis of Variance Table
##
## Response: speedKMH.x
## Df Sum Sq Mean Sq F value Pr(>F)
## periodoJunc 3 16342.2 5447.4 928.87 < 0.00000000000000022 ***
## Residuals 950 5571.3 5.9
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1##
## Shapiro-Wilk normality test
##
## data: resid(modelo.anova2)
## W = 0.89337, p-value < 0.00000000000000022## Levene's Test for Homogeneity of Variance (center = median)
## Df F value Pr(>F)
## group 3 5.4332 0.001047 **
## 950
## ---
## 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 = bs)
##
## $periodoJunc
## diff lwr upr
## R. Siqueira Campos Após-R. Siqueira Campos Antes 1.185265 0.5672496 1.803281
## Sistema Antes-R. Siqueira Campos Antes 7.991520 7.2645575 8.718483
## Sistema Após-R. Siqueira Campos Antes 9.457427 8.8394112 10.075442
## Sistema Antes-R. Siqueira Campos Após 6.806255 6.1882395 7.424271
## Sistema Após-R. Siqueira Campos Após 8.272162 7.7869693 8.757354
## Sistema Após-Sistema Antes 1.465907 0.8478910 2.083922
## p adj
## R. Siqueira Campos Após-R. Siqueira Campos Antes 0.0000056
## Sistema Antes-R. Siqueira Campos Antes 0.0000000
## Sistema Após-R. Siqueira Campos Antes 0.0000000
## Sistema Antes-R. Siqueira Campos Após 0.0000000
## Sistema Após-R. Siqueira Campos Após 0.0000000
## Sistema Após-Sistema Antes 0.00000003.4.1 Velocidades Praticadas
No cenário da TARDE no período anterior a 15/07/2020 a velocidade média em momentos de congestionamento na R. Siqueira Campos foi de 7.7283859, com erro padrão de 0.1596175 e no período posterior a velocidade média no trecho foi de 8.9136511, com erro padrão de 0.1113122. 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.0010465 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:
3.5 Transporte Público
3.5.1 Linha: C3 - Circular Urca
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170.
3.5.2 Linha: 492 - PETRÓPOLIS / SESC
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170. 
3.5.3 Linha: 4332 - V. JARDIM VIA GASÔMETRO
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170. 
3.5.4 Linha: 188 - ASSUNÇÃO
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170. 
3.5.5 Todas Linhas: Faixa exclusiva Siqueira Campos
Performance do trecho entre R. Siqueira Campos, 920 - Centro Histórico, Porto Alegre - RS, 90010-260 e R. Siqueira Campos, 4415 - Centro Histórico, Porto Alegre - RS, 90010-170.
3.5.6 Comparativo
4 Entre Picos
4.1 Mapa de filas no entre picos
Registros de 15/07/2020 a 02/08/2022 (Dias úteis)
Foram identificados no período de entre picos 40 alertas de filas na R. Siqueira Campos entre os dias 15/07/2020 e 02/08/2022, utilizando registros de 59 wazers.
5 FEs Monitoradas no estudo
## 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.1 raster_3.5-15
## [5] ggpmisc_0.4.0 ggpp_0.4.1 ggplot2_3.3.6 stringr_1.4.0
## [9] chron_2.3-56 mapview_2.10.0 sp_1.5-0 tidyr_1.2.0
## [13] dplyr_1.0.9 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.2.5.1 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.3.0 quantreg_5.93 SparseM_1.81
## [22] labeling_0.4.2 sass_0.4.0 scales_1.2.0
## [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.2 fastmap_1.1.0
## [37] highr_0.9 htmlwidgets_1.5.4 rlang_1.0.2
## [40] readxl_1.3.1 rstudioapi_0.13 jquerylib_0.1.4
## [43] generics_0.1.2 farver_2.1.0 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.8.3 munsell_0.5.0
## [52] fansi_1.0.3 abind_1.4-5 lifecycle_1.0.1
## [55] terra_1.5-34 stringi_1.7.6 yaml_2.3.5
## [58] MASS_7.3-54 grid_3.6.2 forcats_0.5.1
## [61] crayon_1.5.1 lattice_0.20-38 haven_2.4.1
## [64] splines_3.6.2 leafpop_0.1.0 knitr_1.39
## [67] pillar_1.7.0 uuid_0.1-4 codetools_0.2-16
## [70] stats4_3.6.2 glue_1.6.2 evaluate_0.15
## [73] leaflet.providers_1.9.0 png_0.1-7 vctrs_0.4.1
## [76] MatrixModels_0.5-0 cellranger_1.1.0 gtable_0.3.0
## [79] purrr_0.3.4 assertthat_0.2.1 xfun_0.31
## [82] openxlsx_4.2.4 e1071_1.7-11 class_7.3-15
## [85] survival_3.3-1 tibble_3.1.7 units_0.8-0
## [88] brew_1.0-6 ellipsis_0.3.2