This returns the user
dataframe, with added columns containing distance
between that user and a given facility - IDs are generated for IDs and
facilities that correspond to their row number.
Examples
if (FALSE) { # \dontrun{
mc_facilities_selected <-extract_facility_selected(
solution_vector = x$lp_solution$solution,
A_mat = x$A,
proposed_facilities = x$proposed_facility)
augmented_users <- augment_user(
facilities_selected = mc_facilities_selected,
existing_facilities = mc_cv_fit_n20_test_1$existing_facility,
existing_users = mc_cv_fit_n20_test_1$existing_user
)
} # }