1 Monitoramento Av. Ipiranga 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 Av. Ipiranga no pico da manhã

Registros de 01/07/2020 a 12/07/2022 (Dias úteis)

O sistema é constituído pelas seguintes vias: Av. Ipiranga, Av. João Pessoa - Pista Esq., Av. João Pessoa - Pista Dir., Av. Borges de Medeiros - Pista Dir., Av. Borges de Medeiros - Pista Esq., R. Silva Só, R. Dr. Salvador França

Os dados permitem demonstrar a existência de uma correlação positiva. de 0.7203839 entre a variação das velocidades médias associadas a Av. Ipiranga e o sistema Av. Ipiranga, 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 Av. Ipiranga demonstra que apenas 51.84% da variação no sistema Av. Ipiranga é explicado pela velocidade da Av. Ipiranga a um P-valor de 0.

## 
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
## 
## Residuals:
##      Min       1Q   Median       3Q      Max 
## -12.7058  -0.9319  -0.0852   0.7842   7.3552 
## 
## Coefficients:
##             Estimate Std. Error t value            Pr(>|t|)    
## (Intercept)  3.29225    0.26665   12.35 <0.0000000000000002 ***
## speedKMH.y   0.61226    0.01992   30.74 <0.0000000000000002 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.732 on 876 degrees of freedom
## Multiple R-squared:  0.519,  Adjusted R-squared:  0.5184 
## F-statistic:   945 on 1 and 876 DF,  p-value: < 0.00000000000000022

2.2 Mapa de filas no pico da manhã

Foram identificados no período da manhã 2699 alertas de filas na Av. Ipiranga entre os dias 01/07/2020 e 12/07/2022, utilizando registros de 2882 wazers.

2.3 Desempenho

2.4 ANOVA Manhã

## 
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = as)
## 
## Residuals:
##      Min       1Q   Median       3Q      Max 
## -11.1495  -1.3562  -0.0989   1.0884  16.1556 
## 
## Coefficients:
##                              Estimate Std. Error t value             Pr(>|t|)
## (Intercept)                   12.8097     0.1686  75.957 < 0.0000000000000002
## periodoJuncAv. Ipiranga Após   0.3502     0.1984   1.765               0.0776
## periodoJuncSistema Antes      -1.5886     0.2385  -6.661   0.0000000000354711
## periodoJuncSistema Após       -1.5053     0.1984  -7.589   0.0000000000000503
##                                 
## (Intercept)                  ***
## periodoJuncAv. Ipiranga Após .  
## periodoJuncSistema Antes     ***
## periodoJuncSistema Após      ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.745 on 1908 degrees of freedom
## Multiple R-squared:  0.09684,    Adjusted R-squared:  0.09542 
## F-statistic: 68.19 on 3 and 1908 DF,  p-value: < 0.00000000000000022

## Analysis of Variance Table
## 
## Response: speedKMH.x
##               Df  Sum Sq Mean Sq F value                Pr(>F)    
## periodoJunc    3  1541.9  513.97  68.194 < 0.00000000000000022 ***
## Residuals   1908 14380.3    7.54                                  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

## 
##  Shapiro-Wilk normality test
## 
## data:  resid(modelo.anova2)
## W = 0.90978, p-value < 0.00000000000000022

## Levene's Test for Homogeneity of Variance (center = median)
##         Df F value Pr(>F)
## group    3  1.7293 0.1589
##       1908

##   Tukey multiple comparisons of means
##     95% family-wise confidence level
## 
## Fit: aov(formula = speedKMH.x ~ periodoJunc, data = as)
## 
## $periodoJunc
##                                             diff        lwr        upr
## Av. Ipiranga Após-Av. Ipiranga Antes  0.35020374 -0.1598475  0.8602549
## Sistema Antes-Av. Ipiranga Antes     -1.58863427 -2.2018861 -0.9753825
## Sistema Após-Av. Ipiranga Antes      -1.50528404 -2.0153352 -0.9952328
## Sistema Antes-Av. Ipiranga Após      -1.93883800 -2.4488892 -1.4287868
## Sistema Após-Av. Ipiranga Após       -1.85548777 -2.2352596 -1.4757159
## Sistema Após-Sistema Antes            0.08335023 -0.4267010  0.5934014
##                                          p adj
## Av. Ipiranga Após-Av. Ipiranga Antes 0.2904196
## Sistema Antes-Av. Ipiranga Antes     0.0000000
## Sistema Após-Av. Ipiranga Antes      0.0000000
## Sistema Antes-Av. Ipiranga Após      0.0000000
## Sistema Após-Av. Ipiranga Após       0.0000000
## Sistema Após-Sistema Antes           0.9750415

2.4.1 Velocidades Praticadas

No cenário da MANHÃ no período anterior a 01/07/2020 a velocidade média em momentos de congestionamento na Av. Ipiranga foi de 12.8097204, com erro padrão de 0.1842572 e no período posterior a velocidade média no trecho foi de 13.1599241, com erro padrão de 0.1040765.
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.1589334 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

2.6 Av. Ipiranga CB

2.6.1 Linha: 343 - Campus Ipiranga

Performance do trecho entre Partenon Ipiranga - Partenon, Porto Alegre - RS, 91530-110 e Partenon Ipiranga - Partenon, Porto Alegre - RS, 90650-002.

2.6.2 Linha: T4 - Transversal 4

Performance do trecho entre Partenon Ipiranga - Partenon, Porto Alegre - RS, 91530-110 e Partenon Ipiranga - Partenon, Porto Alegre - RS, 90650-002.

2.6.3 Todas Linhas: Faixa exclusiva Ipiranga

Performance do trecho entre Partenon Ipiranga - Partenon, Porto Alegre - RS, 91530-110 e Partenon Ipiranga - Partenon, Porto Alegre - RS, 90650-002.

2.6.4 Comparativo

2.7 Av. Ipiranga BC PUC | João Pessoa

2.7.1 Linha: 343 - Campus Ipiranga

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

2.7.2 Linha: 353 - Ipiranga Puc

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

2.7.3 Linha: 343 - Campus Ipiranga

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

2.7.4 Linha: 353 - Ipiranga Puc

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

2.7.5 Todas Linhas: Faixa exclusiva Ipiranga PUC-JP

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

2.7.6 Comparativo

2.8 Faixa exclusiva Ipiranga - T4 N/S

2.8.1 Linha: 343 - Campus Ipiranga

Performance do trecho entre PN128686072 - Jd Carvalho Ipiranga - Jardim Carvalho, Porto Alegre - RS, 90650-002 e PN128686077 - Jd Botanico Ipiranga - Jardim Botânico, Porto Alegre - RS, 90690-095.

2.8.2 Linha: T4 - Transversal 4

Performance do trecho entre PN128686072 - Jd Carvalho Ipiranga - Jardim Carvalho, Porto Alegre - RS, 90650-002 e PN128686077 - Jd Botanico Ipiranga - Jardim Botânico, Porto Alegre - RS, 90690-095.

2.8.3 Todas Linhas: Faixa exclusiva Ipiranga - T4 NS

Performance do trecho entre PN128686072 - Jd Carvalho Ipiranga - Jardim Carvalho, Porto Alegre - RS, 90650-002 e PN128686077 - Jd Botanico Ipiranga - Jardim Botânico, Porto Alegre - RS, 90690-095.

2.8.4 Comparativo

3 Tarde

3.1 Velocidades médias no sistema Av. Ipiranga no pico da tarde

Os dados permitem demonstrar a existência de uma correlação positiva de 0.7203839 entre a variação das velocidades médias associadas a Av. Ipiranga e o sistema Av. Ipiranga, 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 Av. Ipiranga demonstra que apenas 66.75% da variação no sistema Av. Ipiranga é explicado pela velocidade da Av. Ipiranga a um P-valor de 0.

## 
## Call:
## lm(formula = speedKMH.x ~ speedKMH.y, data = correlacao)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -9.6639 -0.7783 -0.0872  0.6748  8.2241 
## 
## Coefficients:
##             Estimate Std. Error t value            Pr(>|t|)    
## (Intercept)  4.40642    0.16554   26.62 <0.0000000000000002 ***
## speedKMH.y   0.57224    0.01354   42.28 <0.0000000000000002 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.411 on 889 degrees of freedom
## Multiple R-squared:  0.6678, Adjusted R-squared:  0.6675 
## F-statistic:  1787 on 1 and 889 DF,  p-value: < 0.00000000000000022

3.2 Mapa de filas no pico da TARDE

Registros de 01/07/2020 a 12/07/2022 (Dias úteis) Foram identificados no período da tarde 2104 alertas de filas na Av. Ipiranga entre os dias 01/07/2020 e 12/07/2022, utilizando registros de 2660 wazers.

3.3 Desempenho

3.4 ANOVA Tarde

## 
## Call:
## lm(formula = speedKMH.x ~ periodoJunc, data = bs)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -9.2108 -1.6773 -0.0852  1.4469 16.2830 
## 
## Coefficients:
##                              Estimate Std. Error t value             Pr(>|t|)
## (Intercept)                   13.0554     0.1802  72.456 < 0.0000000000000002
## periodoJuncAv. Ipiranga Após  -1.8584     0.2127  -8.738 < 0.0000000000000002
## periodoJuncSistema Antes      -1.1870     0.2548  -4.658           0.00000341
## periodoJuncSistema Após       -2.2924     0.2127 -10.778 < 0.0000000000000002
##                                 
## (Intercept)                  ***
## periodoJuncAv. Ipiranga Após ***
## periodoJuncSistema Antes     ***
## periodoJuncSistema Após      ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.966 on 1916 degrees of freedom
## Multiple R-squared:  0.06178,    Adjusted R-squared:  0.06031 
## F-statistic: 42.06 on 3 and 1916 DF,  p-value: < 0.00000000000000022

## Analysis of Variance Table
## 
## Response: speedKMH.x
##               Df  Sum Sq Mean Sq F value                Pr(>F)    
## periodoJunc    3  1110.1  370.02  42.056 < 0.00000000000000022 ***
## Residuals   1916 16857.8    8.80                                  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

## 
##  Shapiro-Wilk normality test
## 
## data:  resid(modelo.anova2)
## W = 0.96065, p-value < 0.00000000000000022

## Levene's Test for Homogeneity of Variance (center = median)
##         Df F value        Pr(>F)    
## group    3  12.392 0.00000005002 ***
##       1916                          
## ---
## 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
## Av. Ipiranga Após-Av. Ipiranga Antes -1.8583720 -2.4052548 -1.31148929
## Sistema Antes-Av. Ipiranga Antes     -1.1869895 -1.8422036 -0.53177547
## Sistema Após-Av. Ipiranga Antes      -2.2924289 -2.8393116 -1.74554612
## Sistema Antes-Av. Ipiranga Após       0.6713825  0.1244998  1.21826523
## Sistema Após-Av. Ipiranga Após       -0.4340568 -0.8449777 -0.02313592
## Sistema Após-Sistema Antes           -1.1054393 -1.6523221 -0.55855659
##                                          p adj
## Av. Ipiranga Após-Av. Ipiranga Antes 0.0000000
## Sistema Antes-Av. Ipiranga Antes     0.0000202
## Sistema Após-Av. Ipiranga Antes      0.0000000
## Sistema Antes-Av. Ipiranga Após      0.0087968
## Sistema Após-Av. Ipiranga Após       0.0336867
## Sistema Após-Sistema Antes           0.0000013

3.4.1 Velocidades Praticadas

No cenário da TARDE no período anterior a 01/07/2020 a velocidade média em momentos de congestionamento na Av. Ipiranga foi de 13.0553836, com erro padrão de 0.1936977 e no período posterior a velocidade média no trecho foi de 11.1970116, com erro padrão de 0.1253165. 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.0000001 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.6 Av. Ipiranga CB

3.6.1 Linha: 343 - Campus Ipiranga

Performance do trecho entre Partenon Ipiranga - Partenon, Porto Alegre - RS, 91530-110 e Partenon Ipiranga - Partenon, Porto Alegre - RS, 90650-002.

3.6.2 Linha: T4 - Transversal 4

Performance do trecho entre Partenon Ipiranga - Partenon, Porto Alegre - RS, 91530-110 e Partenon Ipiranga - Partenon, Porto Alegre - RS, 90650-002.

3.6.3 Todas Linhas: Faixa exclusiva Ipiranga

Performance do trecho entre Partenon Ipiranga - Partenon, Porto Alegre - RS, 91530-110 e Partenon Ipiranga - Partenon, Porto Alegre - RS, 90650-002.

3.6.4 Comparativo

3.7 Av. Ipiranga BC PUC | João Pessoa

3.7.1 Linha: 343 - Campus Ipiranga

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

3.7.2 Linha: 353 - Ipiranga Puc

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

3.7.3 Linha: 343 - Campus Ipiranga

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

3.7.4 Linha: 353 - Ipiranga Puc

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

3.7.5 Todas Linhas: Faixa exclusiva Ipiranga PUC-JP

Performance do trecho entre PN128686062 - Partenon Ipiranga - Jardim Botânico, Porto Alegre - RS, 90160-092 e ANTENA 100 BC - Azenha Ipiranga - Santana, Porto Alegre - RS, 90450-190.

3.7.6 Comparativo

3.8 Faixa exclusiva Ipiranga - T4 N/S

3.8.1 Linha: 343 - Campus Ipiranga

Performance do trecho entre PN128686072 - Jd Carvalho Ipiranga - Jardim Carvalho, Porto Alegre - RS, 90650-002 e PN128686077 - Jd Botanico Ipiranga - Jardim Botânico, Porto Alegre - RS, 90690-095.

3.8.2 Linha: T4 - Transversal 4

Performance do trecho entre PN128686072 - Jd Carvalho Ipiranga - Jardim Carvalho, Porto Alegre - RS, 90650-002 e PN128686077 - Jd Botanico Ipiranga - Jardim Botânico, Porto Alegre - RS, 90690-095.

3.8.3 Todas Linhas: Faixa exclusiva Ipiranga - T4 NS

Performance do trecho entre PN128686072 - Jd Carvalho Ipiranga - Jardim Carvalho, Porto Alegre - RS, 90650-002 e PN128686077 - Jd Botanico Ipiranga - Jardim Botânico, Porto Alegre - RS, 90690-095.

3.8.4 Comparativo

4 Entre Picos

4.1 Mapa de filas no entre picos

Registros de 01/07/2020 a 12/07/2022 (Dias úteis)

Foram identificados no período de entre picos 2267 alertas de filas na Av. Ipiranga entre os dias 01/07/2020 e 12/07/2022, utilizando registros de 2354 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