我使用VennDiagram编写了一个简单的代码，
venn.diagram(list("All Patents" = 1:140188, "Influential Patents" = 1:43271, "Valuable Patents" = 23314:90029),
col = 'transparent', fill = c("yellow", "orange", "green"), alpha = c(0.5, 0.5, 0.5),
cex = 1, cat.fontface = 4, cat.pos = 1, cat.cex = 0.75, cat.dist = -0.03,
cat.fontfamily = 'serif', scaled = TRUE, filename = "Patent_Venn_Diagram.emf");
但是，我生成的图不是成比例的。有人可以建议我如何获得比例图。
最佳答案
如果您愿意切换到另一个软件包，这是在稍微修改输入内容之后使用我的eulerr(我是作者)的解决方案。
library(eulerr)
mod <- c("All Patents" = 50159, "Influential Patents&All Patents" = 23313,
"Valuable Patents&All Patents" = 46758,
"All Patents&Influential Patents&Valuable Patents" = 19958)
fit <- euler(mod)
plot(fit)