1300_refactor_imputation: update vignettes and add documentation for …

…helpers

NAMESPACE

@@ -71,7 +71,6 @@ export(default_qtc_paramcd)
 export(derivation_slice)
 export(derive_derived_param)
 export(derive_extreme_records)
-export(derive_last_dose)
 export(derive_param_bmi)
 export(derive_param_bsa)
 export(derive_param_computed)
@@ -264,6 +263,7 @@ importFrom(rlang,.data)
 importFrom(rlang,abort)
 importFrom(rlang,arg_match)
 importFrom(rlang,as_function)
+importFrom(rlang,as_label)
 importFrom(rlang,as_string)
 importFrom(rlang,call2)
 importFrom(rlang,call_name)

NEWS.md

@@ -36,7 +36,8 @@ imputation functions itself. The following parameters were deprecated:
 
   The following parameters do no longer accept DTC variables:
 
-  - `date` in `date_source()`, `dthcaus_source`, `censor_source()`, and `event_source()`
+  - `date` in `date_source()`, `dthcaus_source()`, `censor_source()`, and
+  `event_source()`
   - `dose_date` and `analysis_date` in `derive_vars_last_dose()`,
   `derive_var_last_dose_amt()`, `derive_var_last_dose_date()`,
   `derive_var_last_dose_grp()`

R/admiral-package.R

@@ -4,14 +4,13 @@
 #'             starts_with transmute ungroup vars n_distinct union distinct
 #'             summarise_at summarise coalesce bind_cols na_if tibble
 #' @importFrom magrittr %>%
-#' @importFrom rlang := abort arg_match as_function as_string call2 caller_env
-#'             call_name current_env .data enexpr enquo eval_bare eval_tidy expr
-#'             expr_interp expr_label f_lhs f_rhs inform
-#'             is_bare_formula is_call is_character is_formula is_integerish
-#'             is_logical is_quosure is_quosures is_symbol new_formula
-#'             parse_expr parse_exprs quo quo_get_expr quo_is_call
-#'             quo_is_missing quo_is_null quo_is_symbol quos quo_squash quo_text
-#'             set_names sym syms type_of warn quo_set_env quo_get_env
+#' @importFrom rlang := abort arg_match as_function as_label as_string call2
+#'   caller_env call_name current_env .data enexpr enquo eval_bare eval_tidy
+#'   expr expr_interp expr_label f_lhs f_rhs inform is_bare_formula is_call
+#'   is_character is_formula is_integerish is_logical is_quosure is_quosures
+#'   is_symbol new_formula parse_expr parse_exprs quo quo_get_expr quo_is_call
+#'   quo_is_missing quo_is_null quo_is_symbol quos quo_squash quo_text set_names
+#'   sym syms type_of warn quo_set_env quo_get_env
 #' @importFrom utils capture.output str
 #' @importFrom purrr map map2 map_chr map_lgl reduce walk keep map_if transpose
 #'             flatten every modify_at modify_if reduce compose

R/assertions.R

@@ -667,6 +667,7 @@ assert_numeric_vector <- function(arg, optional = FALSE) {
 #'
 #' @examples
 #' library(tibble)
+#' library(lubridate)
 #' library(rlang)
 #'
 #' example_fun <- function(dataset, var) {