База географических названий GeoNames
Добавлено: 27 апр 2009, 05:10
Геоинформационные системы (ГИС) и Дистанционное зондирование Земли
https://gis-lab.info/forum/
Ну уж так прям и невозможно... А R на что?отсутствия возможность отфильтровать альтернативный названия на латинице от кириллических
Код: Выделить всё
library(stringi)
library(beepr)
set<-read.table("RU.csv",h=T,sep=";",dec=".",stringsAsFactors=F)
san<-lapply(as.matrix(set[,"alternatenames"]),FUN=strsplit,split=",") # Split lists of alternate names (includig Russian)
can<-NULL # List of cyrillic alternative names (if presented)
for (i in 1:length(san)) {
sani<-unlist(san[i])
sani<-sani[!is.na(stri_locate_first_charclass(sani,
pattern="[:script=Cyrillic:]")[,1])]
can<-append(can,sani)
}
beep(sound="mario")