From 1365ce651c471e7bff1ff70296317b03fce0a957 Mon Sep 17 00:00:00 2001
From: smartinez-yatiribio <smartinez@yatiribio.com>
Date: Thu, 16 Mar 2023 11:12:10 -0700
Subject: [PATCH 1/2] bug fixed in estimateVar

Bug fixed when we have cases that don't satisfy condition length(abun) == ngroup)
---
 R/estimateVar.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/estimateVar.R b/R/estimateVar.R
index cc283eb..ce862e1 100644
--- a/R/estimateVar.R
+++ b/R/estimateVar.R
@@ -116,7 +116,7 @@ estimateVar <- function(data, annotation, log2Trans = FALSE, ...) {
         }
 
         # only keep the rows with results
-        GroupMean <- GroupMean[1:count, ]
+        GroupVar <- GroupVar[1:count, ]
         GroupMean <- GroupMean[1:count, ]
         # assign the row and column names
         rownames(GroupVar) <- Proteins

From ca2786572e69c80766deb5907026fe64432fdab7 Mon Sep 17 00:00:00 2001
From: smartinez-yatiribio <smartinez@yatiribio.com>
Date: Fri, 16 Jun 2023 09:41:49 -0700
Subject: [PATCH 2/2] Add to gitignore

---
 .gitignore | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/.gitignore b/.gitignore
index 5b6a065..5d49a30 100644
--- a/.gitignore
+++ b/.gitignore
@@ -2,3 +2,5 @@
 .Rhistory
 .RData
 .Ruserdata
+*.Rout
+*.Rproj