R CMD CHECK

NAMESPACE

@@ -38,6 +38,7 @@ importFrom(dplyr,left_join)
 importFrom(dplyr,summarize)
 importFrom(dplyr,summarize_)
 importFrom(estimatr,difference_in_means)
+importFrom(fabricatr,describe_variable)
 importFrom(fabricatr,fabricate_data)
 importFrom(lazyeval,as.lazy)
 importFrom(lazyeval,call_modify)

R/declare_design.R

@@ -23,6 +23,7 @@
 #'
 #' @importFrom lazyeval lazy_dots lazy_eval
 #' @importFrom dplyr bind_rows
+#' @importFrom fabricatr describe_variable
 #' @export
 #'
 #' @examples
@@ -262,9 +263,8 @@ print.design <- function(x, ...) {
 
 #' Text Summary of a Design
 #'
-#' @param object
-#'
-#' @param ...
+#' @param object a design object created by \code{\link{declare_design}}
+#' @param ... optional arguments to be sent to summary function
 #'
 #' @examples
 #'

R/declare_sampling.R

@@ -8,7 +8,7 @@
 #' @export
 #' @details
 #'
-#' While declare_sampling can work with any sampling_function that takes data and returns data, most random sampling procedures can be easily implemented with randomizr. The arguments to \code{\link{draw_rs}} can include N, strata_var, clust_var, n, prob, strata_n, and strata_prob. The arguments you need to specify are different for different designs. Check the help files for \code{\link{complete_rs}}, \code{\link{strata_rs}}, \code{\link{cluster_rs}}, or \code{\link{strata_and_cluster_ra}} for details on how to execute many common designs.
+#' While declare_sampling can work with any sampling_function that takes data and returns data, most random sampling procedures can be easily implemented with randomizr. The arguments to \code{\link{draw_rs}} can include N, strata_var, clust_var, n, prob, strata_n, and strata_prob. The arguments you need to specify are different for different designs. Check the help files for \code{\link{complete_rs}}, \code{\link{strata_rs}}, \code{\link{cluster_rs}}, or \code{\link{strata_and_cluster_rs}} for details on how to execute many common designs.
 #' @examples
 #'
 #' my_population <- declare_population(N = 100, female = rbinom(N, 1, .5))

R/diagnose_design.R

@@ -81,11 +81,23 @@ diagnose_design <- function(..., diagnosands = default_diagnosands, sims = 500)
 
 }
 
+#' Get the diagnosands data frame from a diagnosis
+#'
+#' @param diagnosis A diagnosis object created by \code{\link{diagnose_design}}.
+#'
+#' @return a \code{data.frame} of the diagnosand values from a diagnosis
+#'
 #' @export
 get_diagnosands <- function(diagnosis){
   diagnosis$diagnosands
 }
 
+#' Get the simulations data frame from a diagnosis
+#'
+#' @param diagnosis A diagnosis object created by \code{\link{diagnose_design}}.
+#'
+#' @return a \code{data.frame} of the simulations from a diagnosis
+#'
 #' @export
 get_simulations <- function(diagnosis){
   diagnosis$simulations