Use a quadtree index to perform spatial request.
spatial_request(geometry, tree, data)
sf like object (feature collection or simple geometry)
a tree object from package SearchTrees
the original data used to build the tree object
a subset of data, intersecting geometry
data(mtl_network)
tree <- build_quadtree(mtl_network)
buff <- sf::st_buffer(mtl_network[55,], 50)
selection <- spatial_request(buff, tree, mtl_network)