library(UpSetR)
# 创建示例数据集
set1 <- sample(1:100, 50)
set2 <- sample(1:100, 60)
set3 <- sample(1:100, 70)
sets = list(Set1 = set1, Set2 = set2, Set3 = set3)
# 例如只绘制与Set1有关的图
# 只需筛选出其他列表中与Set1有交集的值
for (i in 1:3) {
sets[[i]][sets[[i]]%in%sets[[1]]] -> sets[[i]]
}
upset(fromList(sets))
upset只绘制与某个变量有交集
最新推荐文章于 2024-05-04 07:51:27 发布
![](https://img-home.csdnimg.cn/images/20240711042549.png)