Add more donttests to stay below 5s for each test
Change-Id: I4dde61ce4847f8c7067870256c14fe8998d18e0c
diff --git a/R/misc.R b/R/misc.R
index fad39ad..75697d3 100644
--- a/R/misc.R
+++ b/R/misc.R
@@ -178,9 +178,9 @@
#' @examples
#' library(ggplot2)
#' kco <- new("KorAPConnection", verbose=TRUE)
-#' \donttest{year = (2003:2011)}\dontshow{year = c(2005)}
-#' g <- expand_grid(condition = c("textDomain = /Wirtschaft.*/", "textDomain != /Wirtschaft.*/"),
-#' year) %>%
+#' \donttest{year <- (2003:2011)}\dontshow{year <- c(2005)}
+#' \donttest{condition <- c("textDomain = /Wirtschaft.*/", "textDomain != /Wirtschaft.*/")}\dontshow{condition <- c("textDomain = /Wirtschaft.*/")}
+#' g <- expand_grid(condition, year) %>%
#' cbind(frequencyQuery(kco, "[tt/l=Heuschrecke]",
#' paste0(.$condition," & pubDate in ", .$year))) %>%
#' ipm() %>%