Merge pull request #565 from yjunechoe/align-validation_step-to-report

Better alignment of `agent$validation_step` to rows of `get_agent_report(agent)`

R/get_agent_report.R

@@ -448,7 +448,8 @@ get_agent_report <- function(
 
   # nocov start
 
-  validation_set <- validation_set[report_tbl$i, ]
+  validation_set <- validation_set %>% 
+    dplyr::filter(.data$i %in% report_tbl$i)
   eval <- eval[report_tbl$i]
   extracts <- 
     agent$extracts[