bbox <- get_bbox (c(-0.13,51.50,-0.11,51.52))
dat_B <- extract_osm_objects (key='building', bbox=bbox)
dat_H <- extract_osm_objects (key='highway', bbox=bbox)
dat_BR <- extract_osm_objects (key='building', value='residential', bbox=bbox)
dat_HP <- extract_osm_objects (key='highway', value='primary', bbox=bbox)
dat_HNP <- extract_osm_objects (key='highway', value='!primary', bbox=bbox)
extra_pairs <- c ('name', 'Royal.Festival.Hall')
dat <- extract_osm_objects (key='building', extra_pairs=extra_pairs, bbox=bbox)Run the code above in your browser using DataLab