Добро пожаловать в stackoverflow!Существует функция с именем adist
, которая вычисляет расстояние редактирования Левенштайна между двумя строками (см. Аналогичный вопрос здесь ).
Не зная вашего конкретного варианта использования, мы можем составить пример:
df <- data.frame(a = c('comparing', 'strings', 'between', 'dataframes'),
b = c('comparing', 'integers', 'between', 'data.frames'),
stringsAsFactors = F)
df$levenshtein <- mapply(adist, df$a, df$b)
df$ismatch <- 'maybe'
df$ismatch[df$levenshtein == 0] <- 'yes'
df$ismatch[df$levenshtein >= 3] <- 'no'
df
# gives:
a b levenshtein ismatch
1 comparing comparing 0 yes
2 strings integers 6 no
3 between between 0 yes
4 dataframes data.frames 1 maybe
Вы можете изменить диапазон для ответа 'maybe'
, конечно.