diff --git a/R/utilities.R b/R/utilities.R
index f0e0082..64b8012 100644
--- a/R/utilities.R
+++ b/R/utilities.R
@@ -147,6 +147,8 @@ getImagePheno <- function(x,
                           bind = TRUE,
                           expand = FALSE) {
     x <- x[!duplicated(x$imageID),]
+    x <- x %>%
+      dplyr::mutate(imageID = factor(imageID, levels = unique(imageID)))
     # x <- x %>%
     #     dplyr::filter(
     #         if (!is.null(!!imageID)) imageID == !!imageID else TRUE