デフォルトはこうですが
R
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()
こんなかんじで
R
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()