RG#48: Venn Diagam with quantative circle size and semi tranparency

 
# data
md <- list(B = 1:1770, A = 1571:2020, C= 900:1900)

require(VennDiagram)  

venn.diagram(md, fill = c("red", "green", "blue"), alpha = c(0.5, 0.5, 0.5), cex = 2, cat.fontface = 4, lty =2, fontfamily =3, filename = "vennout.emf")
# out will be saved to file vennout.emf, use getwd() to find working directory