fixing the testing mistake

moritzpschwarz · Mar 4, 2024 · 8f0341e · 8f0341e
1 parent 8060198
commit 8f0341e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/identify_indicator_timings.R b/R/identify_indicator_timings.R
@@ -59,7 +59,7 @@ identify_indicator_timings <- function(object, uis_breaks = NULL){
 
   # TIS
   trends <- object_l[grepl("tis",object_l$name) & object_l$value == 1 ,] # identify the first occurrence of a trend
-
+  if(nrow(trends) == 0){trends <- NULL}
 
   # CFESIS
   if(any(grepl("cfesis",names(object)))){