`R/aggregate.R`

`od_sample_vertices.Rd`

Todo: export this at some point

`od_sample_vertices(x, fraction = 1)`

- x
An sf object representing a road network

- fraction
What percent of the network to sample?

```
if (FALSE) {
u = "https://github.com/ITSLeeds/od/releases/download/v0.3.1/road_network_min.Rds"
f = basename(u)
if(!file.exists(f)) download.file(u, f)
road_network_min = readRDS(f)
od_sample_vertices(road_network_min)
}
```