r - R 维恩图错误 - 三重维恩图
问题描述
我努力绘制一个简单的维恩图,并且遇到了我不理解的错误。
与 Rdocumentation 中为 draw.triple.venn 图函数编写的代码相比,我无法弄清楚我的代码(如下)有什么问题 - 我认为代码很好(https://www.rdocumentation.org/packages /VennDiagram/versions/1.6.20/topics/draw.triple.venn)。
library(VennDiagram)
library(gridExtra)
body(draw.triple.venn)[[78]] <- substitute(cell.labels <- paste0(areas," : ", round( 100*areas/sum(areas), 1), "%"))
# this line of code adds %s to each of the cells in the Venn Diagram
g <- draw.triple.venn(
area1 = 2951,
area2 = 2764,
area3 = 2764,
n12 = 719,
n23 = 807,
n13 = 1034,
n123 = 325,
category = c("Mental Health", "Community", "Social Care"),
fill = c("blue", "red", "green"),
cat.col = c("blue", "red", "green"),
lty = "blank",
euler.d = TRUE,
scaled = TRUE,
cex = 2,
cat.cex = 2);
grid.arrange(gTree(children = g), main = "Breakdown of WSIC Service Users", sub = "By table")
我得到的错误消息,无法弄清楚它的含义是:
Error in if (max.x - min.x >= max.y - min.y) { :
missing value where TRUE/FALSE needed
In addition: Warning messages:
1: In sqrt(r1^2 - (l.x.cept.13 - x.centres[1])^2) : NaNs produced
2: In sqrt(r1^2 - (l.x.cept.13 - x.centres[1])^2) : NaNs produced
谢谢!
解决方案
此处报告了此问题的错误。我试图重现这个例子,我得到了同样的错误。如果你愿意尝试我的 nVennR 库,你可以得到这样的图表:
library(nVennR)
myV <- createVennObj(nSets = 3, sNames = c("Mental Health", "Community", "Social Care"), sSizes = c(0, 598, 913, 807, 873, 1034, 719, 325))
myV <- plotVenn(nVennObj = myV, borderWidth = 2, setColors = c('blue', 'red', 'green'))
正如您在小插图中看到的那样,有一些可视化参数。在那里,您还可以找到 中的数字的基本原理sSizes
。还有其他数据输入方式。最简单的方法是提供包含每个集合元素的列表列表(您可以在小插图开头看到一个示例)。该包将为您计算图表中的所有区域,然后您可以查询属于每个区域的元素。
推荐阅读
- postgresql - 无法在 MacOS PostgreSQL 上启动 Strapi
- batch-file - 如何设置 Windows 10 计划任务在另一个任务失败时触发?
- ruby-on-rails - 带有可选条件的 Array.select
- python - python:使用 CSV 阅读器和从 tarfile 中提取的单个文件
- performance - 采样率对性能的性能影响 - 更高的采样率在 NXP S32 上花费*更少*开销?
- flutter - Flutter - Listview.builder 将初始偏移设置为最后一个位置或像素?
- nearprotocol - 合约可以在 NEAR 协议中自行删除吗?
- c++ - C ++如何产生完全由种子决定的随机序列,独立于编译器或操作系统
- python - 在 Python 3.8 上导入 googleanalytics 时出错
- asp.net-core - Blazor 应用程序、NU1201 和 .NET Core 3.1