From 64d8bf108594783b93c48d4904a8ed00d4cc7862 Mon Sep 17 00:00:00 2001
From: Vincent LAVILLE <vincent.laville@pasteur.fr>
Date: Mon, 14 Jan 2019 15:04:12 +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 7c8ec4f..1e980ee 100644
--- a/R/correlationMatrix.R
+++ b/R/correlationMatrix.R
@@ -96,7 +96,7 @@ changeCoding <- function(x, v) {
#' @export
#'
getGenoCorMatrix <- function(lrsid, lchr, lpos, lrefall, pop, path = NULL, web = TRUE, pruning = TRUE, rthresh = 1) {
- option(warn = -1)
+ options(warn = -1)
if (length(lchr) > 1) {
lpop <- rep(pop, length(lchr))
referencedata <- mapply(get_vcf, lchr, lpos, lpos, lpop, MoreArgs = list(path, web), SIMPLIFY = FALSE)
--
GitLab