cycle_hire {spData} | R Documentation |
Points representing cycle hire points accross London.
cycle_hire
FORMAT:
id Id of the hire point
name Name of the point
area Area they are in
nbikes The number of bikes currently parked there
nempty The number of empty places
geometry sfc_POINT
cyclehireapp.com/cyclehirelive/cyclehire.csv
if (requireNamespace("sf", quietly = TRUE)) { library(sf) data(cycle_hire) # or cycle_hire <- st_read(system.file("shapes/cycle_hire.geojson", package="spData")) plot(cycle_hire) } ## Not run: # Download the data cycle_hire = readr::read_csv("http://cyclehireapp.com/cyclehirelive/cyclehire.csv", col_names = FALSE, skip = TRUE) cycle_hire = cycle_hire[c_names] c_names = c("id", "name", "area", "lat", "lon", "nbikes", "nempty") cycle_hire = st_sf(cycle_hire, st_multipoint(c_names[c("lon", "lat")])) ## End(Not run)