Distance between two locations
step_geodist
creates a specification of a
recipe step that will calculate the distance between
points on a map to a reference location.
step_geodist( recipe, lat = NULL, lon = NULL, role = "predictor", trained = FALSE, ref_lat = NULL, ref_lon = NULL, log = FALSE, name = "geo_dist", columns = NULL, skip = FALSE, id = rand_id("geodist") ) ## S3 method for class 'step_geodist' tidy(x, ...)
recipe |
A recipe object. The step will be added to the sequence of operations for this recipe. |
lon, lat |
Selector functions to choose which variables are affected by the step. See selections() for more details. |
role |
or model term created by this step, what analysis role should be assigned?. By default, the function assumes that resulting distance will be used as a predictor in a model. |
trained |
A logical to indicate if the quantities for preprocessing have been estimated. |
ref_lon, ref_lat |
Single numeric values for the location of the reference point. |
log |
A logical: should the distance be transformed by the natural log function? |
name |
A single character value to use for the new predictor column. If a column exists with this name, an error is issued. |
columns |
A character string of variable names that will
be populated (eventually) by the |
skip |
A logical. Should the step be skipped when the
recipe is baked by |
id |
A character string that is unique to this step to identify it. |
x |
A |
... |
One or more selector functions to choose which
variables are affected by the step. See |
step_geodist
will create a
An updated version of recipe
with the new step added
to the sequence of existing steps (if any). For the tidy
method, a tibble with columns echoing the values of lat
,
lon
, ref_lat
, ref_lon
, name
, and id
.
library(modeldata) data(Smithsonian) # How close are the museums to Union Station? near_station <- recipe( ~ ., data = Smithsonian) %>% update_role(name, new_role = "location") %>% step_geodist(lat = latitude, lon = longitude, log = FALSE, ref_lat = 38.8986312, ref_lon = -77.0062457) %>% prep(training = Smithsonian) bake(near_station, new_data = NULL) %>% arrange(geo_dist) tidy(near_station, number = 1)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.