Merge pull request #159 from atorus-research/gh_issue_74

Add example for set_pop_data
atorus-research · Dec 14, 2023 · a30dd2e · a30dd2e
2 parents 8aa428f + ecf617f
commit a30dd2e
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/R/table_bindings.R b/R/table_bindings.R
@@ -89,6 +89,8 @@ set_header_n <- function(table, value) {
 #'
 #' pop_data(tab) <- mtcars
 #'
+#' tab <- tplyr_table(iris, Species) %>%
+#' set_pop_data(mtcars)
 #' @export
 #' @rdname pop_data
 pop_data <- function(table) {
@@ -108,6 +110,7 @@ pop_data <- function(table) {
 #'
 #' @export
 #' @rdname pop_data
+#'
 set_pop_data <- function(table, pop_data) {
  pop_data_name <- enexpr(pop_data)
  # table should be a data.frame

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