使用 R Venn.diagram 包调整维恩图的相对位置

Question

我想使用 R Venn.digram包绘制维恩图。 这是我的代码。

library(VennDiagram)
myCol2 <- brewer.pal(3, "Pastel2")

list1 <- c(1:179)
list2 <- c(171:224)
list3 <- c(1:17, 171, 172, 225:230)

venn.diagram(
  x = list(list1, list2, list3),
  category.names = c("list1", "list2", "list3"),
  filename = 'three comparison.png',
  output=TRUE,
  resolution = 600,
  cex = 1.8,  # size of numbers in the cycles
  # sub.fontfamily = "serif",
  fontfamily ="Arial",
  main.fontfamily="serif",
  cat.cex = 1.2, # size of category names
  fill = myCol2
)

这是我的维恩图输出。

有没有办法旋转对应于list2和list3的两个循环，使绘图如下所示？ - 基本上，我不希望三个中心在同一条线上。

Answer 1

感谢 Dominik Rafacz 介绍ggvenn包。 有用。

图书馆（ggvenn）

a <- list(list1 = c(1:179),
          list2 = c(171:224),
          list3 = c(1:17, 171, 172, 225:230))

ggvenn(a, c("list1", "list2", "list3"),show_percentage = F)