library(fuzzyjoin)

stringdist_join(
  user_input,
  database,
  by = c("user_input" = "name"),
  method = "lv",
  max_dist = 1,
  distance_col = "distance"
)