From eb9b13e1fd56ac57a08b0c83b9f3d26cc82a465d Mon Sep 17 00:00:00 2001
From: marouenbg <marouen.b.guebila@gmail.com>
Date: Fri, 24 Jun 2022 10:49:50 -0400
Subject: [PATCH] update crane fix

---
 R/CRANE.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/CRANE.R b/R/CRANE.R
index 4f8e6e72..d9aec318 100644
--- a/R/CRANE.R
+++ b/R/CRANE.R
@@ -110,7 +110,7 @@ alpacaCrane = function(input,alp,alpha=0.1,beta=0,iteration=30,isParallel=F){
   tstat=c()
   if (identical(names(alp[[2]]),rownames(df))){
     for (i in 1:nrow(df)){
-      if (rownames(df)[i]=="" || sd(df[i,])==0){
+      if (rownames(df)[i]=="" || sd(df[i,], rm.na=TRUE)==0){
         isSig=c(isSig,NA)
         next
       }