# NOT RUN {
#This is an internal function, no example provided
eventsgpkg <- system.file("extdata", "events.gpkg", package = "spNetwork", mustWork = TRUE)
mtl_libraries <- rgdal::readOGR(eventsgpkg,layer="mtl_libraries", verbose=FALSE)
mtl_theatres <- rgdal::readOGR(eventsgpkg,layer="mtl_theatres", verbose=FALSE)
close_libs <- closest_points(mtl_theatres, mtl_libraries)
# }
Run the code above in your browser using DataLab