绘制数据时出现R cooccur程序包错误

Question

我在使用cooccur程序包时遇到问题。在创建cooccur对象后，我试图绘制它以获得正/负共现的热图。这应该很简单 - 示例中的代码只是“plot（cooccur_object）”，但它会抛出一个错误：zero_range（from）中的错误：x必须是长度1或2。我已经包含可重复的代码，并且欢迎任何想法。该错误似乎取决于数字本身，因为示例代码与“finches”数据集完美匹配，并且在随机生成数字时偶尔会引发错误。下面的可重复代码会抛出错误，但如果更改种子，它有时会运行，有时不会。有什么想法吗？

set.seed(13532) 
a <- rnorm(100) 
a[a>0] <- 1 
a[a<0] <- 0 
a 
b <- matrix(a, ncol = 10) 
df <- as.data.frame(b) 
names(df) <- c(paste("Subject", 1:10)) 
row.names(df) <- c(paste("Disease", LETTERS[1:10])) 
df 

library(cooccur) 
cooc <- cooccur(df) 
plot(cooc) 
summary(cooc) 

Answer 1

感谢您对cooccur的兴趣。我是包装作者，并且愿意就您遇到的问题与您进行沟通。

既然你已经创建了一个随机矩阵，共现分析的结果是（不出所料），没有显着的结果......一切都是随机的。不幸的是，我没有考虑添加一个警告，说没有结果可以绘制，我感谢你将这个引起我的注意！

随时给我发电子邮件，我并不总是跟上论坛。

最好， 丹格里菲斯