From 983544704f405015b2dbc2779a69007923c1b950 Mon Sep 17 00:00:00 2001
From: Vincent LAVILLE <vincent.laville@pasteur.fr>
Date: Fri, 25 Jan 2019 14:40:39 +0100
Subject: [PATCH] Update correlationMatrix.R
---
R/correlationMatrix.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/R/correlationMatrix.R b/R/correlationMatrix.R
index 1e980ee..4f3db96 100644
--- a/R/correlationMatrix.R
+++ b/R/correlationMatrix.R
@@ -162,7 +162,7 @@ getGenoCorMatrix <- function(lrsid, lchr, lpos, lrefall, pop, path = NULL, web =
}
testMat <- changeCoding(testMat, as.character(lrefall) == genoMap$REF)
colnames(testMat) <- lind
- cormat = stats::cor(t(testMat))
+ cormat = stats::cor(t(testMat), use = "complete.obs")
if (pruning) {
return(pruneCorMatrix(cormat, rthresh))
}
--
GitLab