r - Rのデータポイントのすべての一意のペアのリストを作成するにはどうすればよいですか？

Question

したがって、データポイントのベクトルが2つあり、それぞれの一意のペアのリストを、そのペアの頻度とともに作成したいと思います。テーブルを使用してベクトルの1つでこれを実行できることは知っていますが、ペアで実行する方法がわからないようです。

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