R 按相对比例缩放圆尺寸维恩图

R 按相对比例缩放圆尺寸维恩图,r,plot,scale,partitioning,venn-diagram,R,Plot,Scale,Partitioning,Venn Diagram,我正在使用函数draw.triple.Venn()库(VennDiagram)绘制一个维恩图。这是我在R中的代码: g = draw.triple.venn( area1 = 4.1, area2 = 5.6, area3 = 15.9, n12 = 1.3,n23 = 4.2, n13 = 2.3, n123 = 1.2, category = c("Land use", "Environment", "Space"), lwd = c(1.2, 1.2, 1.2), lty

我正在使用函数
draw.triple.Venn()
库(VennDiagram)
绘制一个维恩图。这是我在R中的代码:

    g = draw.triple.venn(
  area1 = 4.1, area2 = 5.6, area3 = 15.9, n12 = 1.3,n23 = 4.2, n13 = 2.3, n123 = 1.2, 
  category = c("Land use", "Environment", "Space"), lwd = c(1.2, 1.2, 1.2), lty = c(1, 1, 1),
  fill = c("darkgray", "gray", "lightgrey"), alpha = c(0.8, 0.8, 0.8), 
  cat.pos = c(330, 30, 150), cat.dist = c(0.06, 0.06, 0.05), sigdig=2, cex=2, cat.cex=2, 
  print.mode = c("raw", "percent"), cat.fontfamily = rep("serif", 3), margin = 0.01,
  ind = T)
  grid.arrange(gTree(children=g))
  grid::grid.text("Residual variance: 80.8%", x=0.18, y=0.03, gp=gpar(col="black", fontsize=16, fontfamily="serif", fontface=1))
这是目前的数字:

我的问题是,是否有可能按相对比例缩放圆的大小

这是该软件包的链接

非常感谢您的建议。

使用库(eulerr)

使用库(eulerr)


可能与您尝试使用的重复?在该函数的描述中,它描述了如何启用缩放。“注意:三组维恩图的常规缩放被禁用,因为数据的视觉表示可能会产生误导。若要重新启用,请将任何值指定给变量overrideTriple。”我也想尝试使用Vennerable,但无法以某种方式安装它。我使用v3.3.3并尝试了
install\u github(“js229/Vennerable”)
install.packages(“Vennerable”,repos=”http://R-Forge.R-project.org)
。我得到这个错误:错误:依赖项“图形”,“RBGL”不适用于包“Vennerable”*删除“C:/Users/dob04d/Documents/R/win library/3.3/Vennerable”。此外,我尝试了
overrideTriple=1
(和其他数字),但没有成功,该值是否表示此实例中的数字?可能与您尝试使用的值重复?在该函数的描述中,它描述了如何启用缩放。“注意:三组维恩图的常规缩放被禁用,因为数据的视觉表示可能会产生误导。若要重新启用,请将任何值指定给变量overrideTriple。”我也想尝试使用Vennerable,但无法以某种方式安装它。我使用v3.3.3并尝试了
install\u github(“js229/Vennerable”)
install.packages(“Vennerable”,repos=”http://R-Forge.R-project.org)
。我得到这个错误:错误:依赖项“图形”,“RBGL”不适用于包“Vennerable”*删除“C:/Users/dob04d/Documents/R/win library/3.3/Vennerable”。此外,我尝试了
overrideTriple=1
(和其他数字),但没有成功,在本例中,value是否表示数字?对如何增加数字的字体大小有何建议?对如何增加数字的字体大小有何建议?
VennDiag <- euler(c("A" = 1.8, "B" = 1.5, "C" = 10.6, "A&B" = 0, "B&C" = 3.0, 
                    "A&C" = 1.1, "A&B&C" = 1.2))
plot(VennDiag, counts = TRUE, font=1, cex=1, alpha=0.5,
     fill=c("grey", "lightgrey", "darkgrey"))
> VennDiag
      original fitted residuals region_error
A          1.8  1.776     0.024        0.002
B          1.5  1.471     0.029        0.002
C         10.6 10.597     0.003        0.005
A&B        0.0  0.210    -0.210        0.011
A&C        1.1  1.158    -0.058        0.002
B&C        3.0  3.024    -0.024        0.000
A&B&C      1.2  1.145     0.055        0.003

diag_error:  0.011 
stress:      0