Идентифицировать элементы в символьном векторе с повторяющимися буквами - PullRequest
2 голосов
/ 10 октября 2011

У меня есть символьный вектор:

"aback" "docks" "trims"

Я хочу идентифицировать элементы в этом векторе с уникальными (без дубликатов) буквами. т.е.

FALSE TRUE TRUE

Какой эффективный способ сделать это в R?

1 Ответ

5 голосов
/ 10 октября 2011
sapply( strsplit(c("aback", "docks", "trims"), ""), length) == 
   sapply( sapply( strsplit(c("aback", "docks", "trims"), ""), unique), length)
#[1] FALSE  TRUE  TRUE

# Or 
nchar(c("aback", "docks", "trims") ) == 
    sapply( sapply( strsplit(c("aback", "docks", "trims"), ""), unique), length)
[1] FALSE  TRUE  TRUE
...