R语言中向量取唯一值

> a <- c(1,2,2,2,3,1,1,3)
> a
[1] 1 2 2 2 3 1 1 3
> unique(a)
[1] 1 2 3
> duplicated(a)
[1] FALSE FALSE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE
> !duplicated(a)
[1]  TRUE  TRUE FALSE FALSE  TRUE FALSE FALSE FALSE
> a[!duplicated(a)]
[1] 1 2 3