&引用;对象';频率';“未找到”;在UpSetR中应用颜色时出错
如果运行此reprex,我将获得所需的输出:&引用;对象';频率';“未找到”;在UpSetR中应用颜色时出错,r,upsetr,R,Upsetr,如果运行此reprex,我将获得所需的输出: ``` r library(UpSetR) listInput <- list(one = c(1, 2, 3, 5, 7, 8, 11, 12, 13), two = c(1, 2, 4, 5, 10), three = c(1, 5, 6, 7, 8, 9, 10, 12, 13)) upset(fromList(listInput), order.by = "f
``` r
library(UpSetR)
listInput <- list(one = c(1, 2, 3, 5, 7, 8, 11, 12, 13),
two = c(1, 2, 4, 5, 10),
three = c(1, 5, 6, 7, 8, 9, 10, 12, 13))
upset(fromList(listInput), order.by = "freq")
```
``r
图书馆(UpSetR)
listInput将一列整数添加到输入到中的数据帧中
library(UpSetR)
listInput <- list(one = c(1, 2, 3, 5, 7, 8, 11, 12, 13),
two = c(1, 2, 4, 5, 10),
three = c(1, 5, 6, 7, 8, 9, 10, 12, 13))
df <- fromList(listInput)
df$n <- sample(1:nrow(df))
upset(df, order.by = "freq",
queries = list(list(query = intersects,
params = list("one"),
color = "orange")))
库(UpSetR)
listInput“一”与“无”相交的地方也能着色吗?@Carl我彻底修改了我的答案。见提议的解决方案。希望它能帮助你。
library(UpSetR)
listInput <- list(one = c(1, 2, 3, 5, 7, 8, 11, 12, 13),
two = c(1, 2, 4, 5, 10),
three = c(1, 5, 6, 7, 8, 9, 10, 12, 13))
df <- fromList(listInput)
df$n <- sample(1:nrow(df))
upset(df, order.by = "freq",
queries = list(list(query = intersects,
params = list("one"),
color = "orange")))