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

Question

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

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，而你只需要表...

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