나는 동그라미로 가로로 배열한 이 그림으로 테두리에 숫자를 쓰고 싶다

기본값은

library (Venn Diagram)
png("fig_a.png")
fig_a <- venn.diagram(
  x = list( A = 1:150, B = 121:180 ),
  filename =NULL,
  cex = 3,
    cat.cex = 3,
    )
grid.newpage()
grid.draw(fig_a)
dev.off()

이런 느낌으로.

png("fig_b.png")
fig_b <- venn.diagram(
  x = list( "150" = 1:150, "60" = 121:180 ),
    label.col = "white",                            # ラベル（数値）を白にして見えなくする
  filename =NULL,
  cex = 3,
    cat.cex = 3,
    cat.dist = c(0, 0),
    cat.pos = c(0, 0),
    )
grid.newpage()
grid.draw(fig_b)
dev.off()

겹치는 부분만 보여주고 싶으면.

png("fig_c.png")
fig_c <- venn.diagram(
  x = list( "150" = 1:150, "60" = 121:180 ),
    label.col = c("white","black","white"),
  filename =NULL,
  cex = 3,
    cat.cex = 3,
    cat.dist = c(0, 0),
    cat.pos = c(0, 0),
    )
grid.newpage()
grid.draw(fig_c)
dev.off()