Compare with existing Bus lanes

[temospena]

And add a function to filter roads with more than 1 lane per direction (Banza and Costeira idea)

[temospena]

And update in OSM the existing ones (LPP/ @ManuelBanza )
https://github.com/U-Shift/busclar/releases/download/latest/Rota_Carris_Faixa_BUS_Atual.geojson

[temospena]

2017

[temospena]

The code is missing relevant tag options.

For instance, see Av da Liberdade

Maybe there is a way to proper filter these? @gmatosferreira
how it is now, ignoring this case:

bus_lanes = road_osm |> select(contains("psv"))
bus_lanes = bus_lanes |>
  filter(
    psv == "designated" |
      `lanes:psv` == 1 |
      `lanes:psv:forward` == 1 |
      `lanes:psv:backward` == 1 |
      `psv:lanes:backward` == "designated" |
      `psv:lanes:forward` == "designated" |
      !is.na(`psv:lanes`)
  )