nVennr。更改标准表单图形并移除图例

Question

我正在使用nVennr，它已经被证明是非常有用的，尽管我已经阅读了所有的支持文档，但仍然无法找到如何做我想象中可能做的两件事。它们是如何将显示的图形更改为非标准格式，以及如何删除图例。

下面是一些数据，说明了nVennr如何自动将图形转换为标准格式。

library(nVennr)
library(dplyr)
library(rsvg)
library(grImport2)

SetA = round(runif(10000000),0)
SetB = round(runif(10000000),0)
SetC = round(runif(10000000),0)

allSets = cbind(SetA, SetB, SetC) %>% 
  as.data.frame() %>% 
  rownames_to_column()

SetA = subset(allSets, SetA == 1)$rowname
SetB = subset(allSets, SetB == 1)$rowname
SetC = subset(allSets, SetC == 1)$rowname

myV = plotVenn(list(SetA = SetA,
                SetB = SetB,
                SetC = SetC),
           nCycles = 10000)

任何帮助都将非常感谢，特别是在标准表单问题上，这会使绘图变得非常丑陋。

谢谢!

Answer 1

很高兴你喜欢这个套餐。我不确定你所说的标准形式是什么意思。也许你想要一个有三个重叠圆圈的图表。在这种情况下，我建议使用其他包，比如那些建议的here。您可以使用nVennR获得regular Venn图，如插图中所示，但默认形状在region中始终是圆形，而不是在set中

library(nVennR)
myV3 <- createVennObj(nSets = 3, sSizes = c(rep(1, 8)))
myV3 <- plotVenn(nVennObj = myV3, labelRegions=F, showNumbers=F, opacity=0.2, borderWidth=4)

结果将是：

​

​

关于图例，我不认为这是必要的，因为很容易从生成的svg文件中删除它。但是，由于我需要上传一个新版本，我将很快添加此函数。

编辑:新版nVennR (0.2.2)刚刚发布。现在，plotVenn和showSVG有了showLegend选项。如果设置为false，则不显示图例。