Plotting elements that have a specific key

[Robinlovelace]

Example: bicycle=*

Context: question on how to make it work.

# Reproducible example with osm
# remotes::install_cran("osmextract") # and other pkgs needed
library(osmextract)
#> Data (c) OpenStreetMap contributors, ODbL 1.0. https://www.openstreetmap.org/copyright.
#> Check the package website, https://docs.ropensci.org/osmextract/, for more details.
library(tidyverse)
library(tmap)
# tmap_mode("view")

et = c(
  "maxspeed",
  "ref",
  "bicycle",
  "cycleway",
  "lanes",
  "oneway",
  "footway",
  "access"
)

osm_lines = oe_get("isle of wight", extra_tags = et)
#> The input place was matched with: Isle of Wight
#> The chosen file was already detected in the download directory. Skip downloading.
#> The corresponding gpkg file was already detected. Skip vectortranslate operations.
#> Reading layer `lines' from data source `/home/robin/data/osm/geofabrik_isle-of-wight-latest.gpkg' using driver `GPKG'
#> Simple feature collection with 46059 features and 17 fields
#> Geometry type: LINESTRING
#> Dimension:     XY
#> Bounding box:  xmin: -5.405035 ymin: 43.35489 xmax: -0.175775 ymax: 50.89601
#> Geodetic CRS:  WGS 84
osm_lines_bicycle = osm_lines %>% 
  filter(!is.na(highway)) %>% 
  filter(!is.na(bicycle)) 

tm_shape(osm_lines_bicycle) +
  tm_lines(lwd = 3, col = "bicycle", popup.vars = c("highway", "access", "bicycle"))
#> Linking to GEOS 3.8.0, GDAL 3.0.4, PROJ 6.3.1

^{Created on 2021-05-05 by the reprex package (v2.0.0)}

[agila5]

Hi Robin and good morning. I'm sorry but I don't understand what is the question 😅

[Robinlovelace]

No question, I was demonstrating how to plot elements for someone who asked and needed a place to publish the reprex. This seemed like a good option, any other plotting discussions welcome. Basically no questions here and a good demonstration that the package works 🎉

[agila5]

Ah ops, thank you for the example 🎉