r - 如何列出 R 中所有唯一的数据点对？

Question

所以我有两个数据点向量，我想列出每个唯一对以及该对的频率。我知道我可以使用 table 来处理其中一个向量，但我似乎无法弄清楚如何让它成对地完成。

Answer 1

只是...

dat <- data.frame(x = sample(letters[1:3], size = 100, replace = TRUE),
    y = sample(letters[1:3], size = 100, replace = TRUE) )

unique(dat)
table(dat)

或者，假设您的向量只是 x 和 y，而您只想要表格...

table(x,y)

Answer 2

# A sample dataset:
dat <- data.frame(x = sample(letters, size = 1000, replace = TRUE),
                  y = sample(letters, size = 1000, replace = TRUE)
)

# Aggregating using just base R:
as.data.frame(table(dat$x, dat$y))

# With plyr
library(plyr)
count(dat, vars = c(x, y))
count(dat) # Or, less generalizably

Answer 3

如果vec1和vec2是有问题的向量：

points <- mapply(c, vec1, vec2, SIMPLIFY=FALSE)
uniq.points <- unique(points)
freqs <- sapply(uniq.points, FUN=function(point) length(which(points %in% list(point))))
cbind(do.call(rbind, uniq.points), freqs)  # matrix of points and freqs