diff --git a/R/SimCollect.R b/R/SimCollect.R
index 74a1f5a..ab9bf8d 100644
--- a/R/SimCollect.R
+++ b/R/SimCollect.R
@@ -356,7 +356,7 @@ subset_results <- function(obj, select){
             obj <- dplyr::select(obj, c(design.names, select))
     } else {
         if(length(select))
-            obj <- dplyr::select(obj, c(design.names, select))
+            res <- dplyr::select(res, select)
     }
     attr(obj, 'extra_info')$stored_results <- res
     obj