diff --git a/DESCRIPTION b/DESCRIPTION
index 129fb66..b82e0d5 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: RCon3D
 Title: Analysis of Confocal Images of Microbial Biofilms
-Version: 1.2.6
+Version: 1.2.7
 Authors@R: person("Jakob", "Russel", email = "russel2620@gmail.com", role = c("aut", "cre"))
 Description: Various 3D analyses of confocal images. E.g. Quantification, co-aggregation and identifying 3D aggregates.
 Depends: R (>= 3.2.5)
diff --git a/R/clumps_plot.R b/R/clumps_plot.R
index 79e9ea6..d5f51ce 100644
--- a/R/clumps_plot.R
+++ b/R/clumps_plot.R
@@ -21,7 +21,7 @@ clumps_plot <- function(clumps.out, replica = 1, col = "agg", pwidth = NULL, zst
   M <- M[!is.na(M$value),]
 
   # Remove by threshold
-  subsize <- clumps.out[[1]][clumps.out[[1]]$Img == unique(clumps.out[[1]]$Img)[1],]
+  subsize <- clumps.out[[1]][clumps.out[[1]]$Img == unique(clumps.out[[1]]$Img)[replica],]
   if(thresh.m){
     if("Size.micron" %in% colnames(subsize)){
       rem <- as.character(subsize[subsize$Size.micron < thresh,"ID"])