首页 文章

测试R中的向量中的值是否唯一

提问于
浏览
4

我们假设以下示例:

test<-c(1:5,3:7)

这使

test
[1] 1 2 3 4 5 3 4 5 6 7

我想有一个简单的函数,如果值在向量中是唯一的,则返回TRUE .

[1] TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE

What I tried:

unique(test) 只给了我一些独特的 Value 观,包括那些重复的 Value 观 . duplicated(test) 让我回来了

[1] FALSE FALSE FALSE FALSE FALSE  TRUE  TRUE TRUE FALSE FALSE

这显然不是必需的结果,因为函数按顺序测试重复观察,第一次出现不算作重复 . 我当然可以通过包含 fromLast = T 来反转控制序列并创建两个向量 . 在这两个中,我可以创建一个表示真正独特值的第三个......但这很复杂 .

table(test) 允许我计算每个值的出现次数

test
1 2 3 4 5 6 7 
1 1 2 2 2 1 1

这让我更接近我想要的,但仍然不是必需的结果(一个相同长度的向量,表明它是否在向量中是唯一的 . )


所以任何人都知道如何更容易地做到这一点?

3 回答

  • 2

    匹配运算符 %in% 非常有用 .

    !test %in% test[duplicated(test)]
    
  • 7

    您使用 duplicated()fromLast = TRUE 开关与OR运算符结合使用的原始建议似乎是一个简单而优雅的解决方案:

    test <- c(1:5, 3:7)
    test
    ## [1] 1 2 3 4 5 3 4 5 6 7
    
    duplicated(test) # incorrect result
    ## [1] FALSE FALSE FALSE FALSE FALSE  TRUE  TRUE  TRUE FALSE FALSE
    
    duplicated(test) | duplicated(test, fromLast = TRUE) # correct result
    ## [1] FALSE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE FALSE
    

    当使用data.table按组执行操作时,此播放很好,如果您的变量名是行值或组列向量,则语法会使其不明确 .

  • 1
    test<-c(1:5,3:7)
    isUnique <- function(vector){
                     return(!any(duplicated(vector)))
               }
    isUnique(test)
    

    如果vector的值是唯一的,则该函数将返回true

相关问题