Add more donttests to stay below 5s for each test
Change-Id: I4dde61ce4847f8c7067870256c14fe8998d18e0c
diff --git a/R/highcharter-helper.R b/R/highcharter-helper.R
index 9e98114..c9c9ac1 100644
--- a/R/highcharter-helper.R
+++ b/R/highcharter-helper.R
@@ -11,9 +11,10 @@
#' @param ylabel defaults to \% if \code{as.alternatives} is \code{true} and to "ipm" otherwise.
#'
#' @examples
-#' \donttest{year <- c(1990:2018)}\dontshow{year <- c(2013:2014)}
+#' \donttest{year <- c(1990:2018)}\dontshow{year <- c(2013:2013)}
+#' \donttest{alternatives <- c("macht []{0,3} Sinn", "ergibt []{0,3} Sinn")}\dontshow{alternatives <- c("macht []{0,3} Sinn")}
#' new("KorAPConnection", verbose = TRUE) %>%
-#' frequencyQuery(query = c("macht []{0,3} Sinn", "ergibt []{0,3} Sinn"),
+#' frequencyQuery(query = alternatives,
#' vc = paste("textType = /Zeit.*/ & pubDate in", year),
#' as.alternatives = TRUE) %>%
#' hc_freq_by_year_ci(as.alternatives = TRUE)