UpsetR：添加数字标签以设置绘图上的大小

是否有任何方法可以在UpsetR中的设置尺寸栏顶部添加标签，类似于主交点图形的show.number

test <- upset(grouped_hot,
              sets                = c("A", "B", "C", "N"),
              nintersects         = 8,
              mb.ratio            = c(0.6, 0.4),
              sets.x.label        = "Number of Patients",
              sets.bar.color      =  "#56B4E9",
              mainbar.y.label     = "Number of Patients",
              order.by            = "freq",
              empty.intersections = "on",
              keep.order          = FALSE,
              scale.sets          = "identity",
              att.pos             = "top",
              text.scale          = c(2.5, 2.5, 2, 1.5, 2.5, 2.5))

---

test可以使用set_size.show执行此操作：

test <- upset(grouped_hot, sets= c("A", "B", "C", "N"), 
        nintersects = 8, 
        mb.ratio = c(0.6, 0.4), 
        ...
        att.pos = "top", 
        text.scale = c(2.5,2.5,2,1.5,2.5,2.5),
        set_size.show = TRUE)

测试