docs: replace example with one that works (#108)

lvaudor · Aug 30, 2023 · 4a7abea · 4a7abea
1 parent 08ac579
commit 4a7abea
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 12 deletions.
diff --git a/R/spq_group_by.R b/R/spq_group_by.R
@@ -4,13 +4,13 @@
 #' @return A query object
 #' @export
 #' @examples
-#' \dontrun{
 #' spq_init() %>%
-#' spq_add("?s a ?class") %>%
-#' spq_group_by(class) %>%
-#' spq_head(n=3) %>%
-#' spq_perform()
-#' }
+#' spq_add("?item wdt:P361 wd:Q297853") %>%
+#' spq_add("?item wdt:P1082 ?folkm_ngd") %>%
+#' spq_add("?area wdt:P31 wd:Q1907114", .label = "?area") %>%
+#' spq_add("?area wdt:P527 ?item") %>%
+#' spq_group_by(area, areaLabel)  %>%
+#' spq_summarise(total_folkm = sum(folkm_ngd))
 spq_group_by = function(.query, ...){
 
   vars = purrr::map_chr(rlang::enquos(...), spq_treat_argument)

diff --git a/man/spq_group_by.Rd b/man/spq_group_by.Rd