識別字符矢量項目進行重複的字母

我有一個特徵向量：識別字符矢量項目進行重複的字母

"aback" "docks" "trims"

我希望找出獨特（沒有重複的）字母在這個載體的項目。即

FALSE TRUE TRUE

什麼是在R中這樣做的有效方法？

來源

2011-10-09 Zach

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

來源

2011-10-10 01:38:52

'sapply（strsplit（CHAR_VEC，分裂= 「」），anyDuplicated）> 0' - 其中'CHAR_VEC < - 代表（C（「吃驚」，「碼頭」，「修剪」），100000） ' - 看起來比其中任何一個快近2倍。 **如果**速度是一個問題，我想知道基地R可能會進一步加速。 –

謝謝。有意義的是，它只需處理一次參數就可以更快地進行。我以前從未見過這個功能。我查看了是否可以從代碼中學到更多技巧，但是'anyDuplicated.default'是一個.Internal函數 –

識別字符矢量項目進行重複的字母

回答

相關問題