diff --git a/FROGS_collapse_TSV_abundance b/FROGS_collapse_TSV_abundance
index 69a663e2d90c16542b5d658606b6072953b0d1f8..4427810423275dcbaf3712729c05c695182f5339 100644
--- a/FROGS_collapse_TSV_abundance
+++ b/FROGS_collapse_TSV_abundance
@@ -7,7 +7,7 @@ FROGS_collapse <- function(a,name)
   for(j in 1:dim(c)[2])
   {
     print(j)
-    temp <- (a[,11:dim(a)[2]])
+    temp <- (a[,7:dim(a)[2]])
     temp2 <- matrix(ncol=dim(temp)[2],nrow=length(unique(c[,j])))
     rownames(temp2) <- sort(unique(c[,j]))
     colnames(temp2) <- colnames(temp)