使用UpSet for R可视化集合中的交集

Question

我目前正在使用RStudio中的UpSet包来显示包含大约400个变量的6个数据集中的交叉点。我绘制了一个直方图，在那里我可以看到每组中交叉变量的数量。

但是我想知道参与每个交叉点的这些变量是什么。这命令我可以用它来生气，告诉我这个信息？

Answer 1

dt1 <- data.table(v1=c(rep(1,10)),
                  v2=c(rep(1,10)),
                  v3=c(rep(1,10)))

dt2 <- data.table(v1=c(rep(1,10)),
                  v2=c(rep(1,10)),
                  v4=c(rep(1,10)))

dt3 <- data.table(v5=c(rep(1,10)),
                  v2=c(rep(1,10)),
                  v4=c(rep(1,10)))
dt <- list(dt1,dt2,dt3)

Reduce(intersect, lapply(dt,function(x){names(x)}))

# [1] "v2"