Для этого можно использовать пакет stringr
.Смотрите? "Stringi-search-charclass" для получения подробной информации о том, как использовать свойства Юникода.
text=c("車","男","犬", "sba", "druzhba")
library(stringr)
text[str_detect(text, "[\\p{Letter}&&\\p{script=latin}]")]