diff --git a/.gitignore b/.gitignore
index 5b6a065..5d49a30 100644
--- a/.gitignore
+++ b/.gitignore
@@ -2,3 +2,5 @@
 .Rhistory
 .RData
 .Ruserdata
+*.Rout
+*.Rproj
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