Mapa com as paradas de início e fim linhas transporte público

Mapa produzido a partir dos dados do GTFS, oriundos da CITATTI, referentes ao mês de junho/2024.

Objetivo: auxiliar, de modo visual, a complementação do levantamento dos terminais de ônibus e sua classificação
Metodologia:
Filtro-se as paradas de início e fim de cada linha
Adotou-se os sentidos do GTFS: 0 -> bairro-centro; 1 -> centro-bairro
Filtrou-se as linhas dos dias úteis
Plotou-se as paradas no mapa

# Obter o primeiro e o último valor de stop_sequence para cada route_short_name, para os dias úteis
df_paradas_inicio_fim_linha <- df %>%
  group_by(route_short_name, direction_id) %>%
  filter(stop_sequence == first(stop_sequence) | stop_sequence == last(stop_sequence)) %>%
  ungroup()%>%
  select(route_short_name, service_id, direction_id, stop_lon, stop_lat, service_id)%>%
  filter(grepl("U", service_id))

# Exibir o mapa
mapa