## NOTE: Example is wrapped in `\dontrun{}` as function requires a large
## amount of data which is not included in the package.
if (FALSE) {
loc <- data.frame(id = "001", lon = -78.90, lat = 35.97)
calculate_tri(
from = tri, # derived from process_tri() example
locs = loc,
locs_id = "id",
radius = c(1e3L, 1e4L, 5e4L)
)
}
Run the code above in your browser using DataLab