Страница 1 из 1

Поиск по образцу

Добавлено: 23 сен 2020, 18:26
VistaSV30
Добрый день!
Есть базовая функция pmatch("образец", SS), которая выполняет поиск элементов в векторе SS, которые частично совпадают с элементами вектора SS.

Подскажите, пожалуйста, есть функция, которая делает всё наоборот.
Например, функция получает значение "Московская область", а возвращает номер строки из таблицы, где у меня хранится значение "Московская"

Это мой список названий регионов России:
https://yadi.sk/i/0yQyYvfsv4y6Dw

Спасибо!

Re: Поиск по образцу

Добавлено: 23 сен 2020, 21:53
VistaSV30
Пока написал такую функцию

Код: Выделить всё

Region_Kod <- function(Name){
  Nm <- tolower(Name)
  z <-c("область", "обл.","край", "республика", "респ.", "ао", "автономный", 
    "автономная","авт.", "округ", "г. ", "управление")
  for (i in 1:length(z)) Nm <- sub(z[i], "", Nm)
  Nm <- trimws(Nm)
  
    Rg <- v$Kod[pmatch(Nm, tolower(v$Name) )]
  
  return(Rg)
}
Но еще остаются проблемы с определением, следующих регионов:
респ. Саха (Якутия)
респ. Сев.Осетия
Завтра попытаюсь понять в чем проблема