R删除其他列中的重复项

嘿，伙计们，我以前确实解决过这个问题，但我的代码丢了。。。 这是我所拥有的东西的简化

a1 <- c(1,2,4,3,5)
a2 <- c("a","b","b","c","f")
a3 <- c(3,4,"b",1,9)
a4 <- c("c","b",2,"a","d")
a <- cbind(a1,a2,a3,a4)

---

a1我们可以
按行对“a”进行排序，获取not（
！
）
重复的
元素的逻辑索引，并使用该索引过滤行

i1 <- !duplicated(t(apply(a, 1, sort)))
a1 <- a[i1,]

我们可以按行对“a”进行
排序，获取not（
！
）
重复的
元素的逻辑索引，并使用该索引过滤行

i1 <- !duplicated(t(apply(a, 1, sort)))
a1 <- a[i1,]