用R语言在维恩图中添加多个值

Question

如何通过R在维恩图中的集合中添加多个值？

我的代码：

grid.newpage()
draw.pairwise.venn(10, 9, 2, category = c("A", "B"),
                   lty = rep("blank",2), fill = c("light blue", "pink"),
                   alpha = rep(0.5, 2), cat.pos = c(0,0), cat.dist = rep(0.025, 2))