diff --git a/R/helpers-componentsCreateCustomColDefList.R b/R/helpers-componentsCreateCustomColDefList.R
index b1dabe2f..dc9823d3 100644
--- a/R/helpers-componentsCreateCustomColDefList.R
+++ b/R/helpers-componentsCreateCustomColDefList.R
@@ -65,6 +65,7 @@ createCustomColDefList <- function(rawColNames, niceColNames = NULL,
 
 # examples
 # Define custom column definitions
+# mydf = data.frame(raw = c("name", "age", "country"))
 # customColDefs <- createCustomColDefList(
 #   rawColNames = mydf$raw,
 #   niceColNames = c("Name", "Age", "Country"),
diff --git a/R/phevaluator-main.R b/R/phevaluator-main.R
index 487fe0f0..826ada52 100644
--- a/R/phevaluator-main.R
+++ b/R/phevaluator-main.R
@@ -438,7 +438,12 @@ phevaluatorServer <- function(
                                  html = T
                                  ),
         sql = reactable::colDef(show = F),
-        json = reactable::colDef(show = F)
+        json = reactable::colDef(show = F),
+        startDate = reactable::colDef(show = F),
+        startDate.1 = reactable::colDef(show = F),
+        endDate = reactable::colDef(show = F),
+        endDate.1 = reactable::colDef(show = F)
+        
       )
       
       #define custom column definitions and render the result table
@@ -446,7 +451,7 @@ phevaluatorServer <- function(
 
       
       resultTableServer(id = "algorithmPerformanceResultsTable",
-                        df = dataAlgorithmPerformance(),
+                        df = dataAlgorithmPerformance,
                         colDefsInput = customColDefs,
                         downloadedFileName = "algorithmPerformanceResultsTable-")