Add deprecation warning on get_counts

NEWS.md

@@ -1,3 +1,8 @@
+# uptasticsearch 0.3.0
+
+## Deprecations and Removals
+- [#69](https://github.com/UptakeOpenSource/uptasticsearch/pull/69) added a deprecation warning on `get_counts`. This function was outside the core mission of the package and exposed us unnecessarily to changes in the Elasticsearch DSL
+
 # uptasticsearch 0.2.0
 
 ## Features

R/elasticsearch_eda_funs.R

@@ -32,6 +32,7 @@
 #'                      , end_date = "now"
 #'                      , time_field = "dateTime")
 #' }
+#' @note \href{https://github.com/UptakeOpenSource/uptasticsearch/pull/69}{get_counts will be deprecated soon}
 get_counts <- function(field
                       , es_host
                       , es_index
@@ -42,6 +43,13 @@ get_counts <- function(field
                       , max_terms = 1000
 ){
 
+    msg <- paste0(
+      "get_counts is deprecated as of https://github.com/UptakeOpenSource/uptasticsearch/pull/69. It will be ",
+      "dropped in the next release of uptasticsearch. If you use this function, please open an issue at ",
+      "https://github.com/UptakeOpenSource/uptasticsearch/issues and let the maintainers know."
+    )
+    log_warn(msg)
+
     # Input checking
     es_host <- .ValidateAndFormatHost(es_host)