Calculate mission distance between two nonprofits. Primarily as an internal
function in calc_distance
, but can be used on its own. See Appraisal Process
Vignette for detailed information on how this value is calculated.
Arguments
- org1
output of
get_org_values()
for first org- org2
output of
get_org_values()
for second org- mission.weights
mission.weights from output of
get_weights()
Examples
org1 <- get_org_values(
state = "IL",
location.type = "metro",
total.expense = 500000,
ntee = "Q1120")
org2 <- get_org_values(
state = "OH",
location.type = "suburban",
total.expense = 300000,
ntee = "A35")
mission.weights <- get_mission_weights()
get_mission_dist(org1, org2, mission.weights)
#> [1] 1.176091