starting to fix CRAN check issues

DESCRIPTION

@@ -1,33 +1,29 @@
 Package: optic
 Title: OPTIC
-Description: Implements simulation work to assess the strengths and weaknesses
-    of various model and analytic approaches to evaluating policy that responds
-    to the opioid crisis.
 Version: 0.1
 Authors@R: c(
-    person("Adam", "Scherling", email="[email protected]", role=c("cre", "aut")),
-    person("Beth Ann", "Griffin", email="[email protected]", role=c("aut")),
-    person("Joseph", "Pane", role=c("aut")),
-    person("Geoffrey", "Grimm", role=c("aut")))
-Depends: R (>= 3.6.0)
+    person("Adam", "Scherling", , "[email protected]", role = c("cre", "aut")),
+    person("Beth Ann", "Griffin", , "[email protected]", role = "aut"),
+    person("Joseph", "Pane", role = "aut"),
+    person("Geoffrey", "Grimm", role = "aut")
+  )
+Description: Implements simulation work to assess the strengths and
+    weaknesses of various model and analytic approaches to evaluating
+    policy that responds to the opioid crisis.
 License: GPL-3 | file LICENSE
+Depends: 
+    R (>= 3.6.0)
 Imports:
     dplyr,
-    tidyr,
-    rlang,
+    future.apply,
+    lmtest,
     magrittr,
-    R6,
-    twang,
-    DataCombine,
     MASS,
+    purrr,
+    R6,
     sandwich,
-    lmtest
+    tidyr,
+    utils
 Encoding: UTF-8
-RoxygenNote: 7.1.1
-Suggests: 
-    future,
-    knitr,
-    parallel,
-    rmarkdown
-VignetteBuilder: knitr
 LazyData: true
+RoxygenNote: 7.2.1

NAMESPACE

@@ -32,5 +32,8 @@ export(selbias_results)
 export(selbias_sample)
 import(dplyr)
 importFrom(R6,R6Class)
+importFrom(future.apply,future_lapply)
 importFrom(magrittr,"%>%")
+importFrom(purrr,cross)
+importFrom(purrr,transpose)
 importFrom(tidyr,crossing)

R/create-config.R

@@ -37,6 +37,9 @@
 #' 
 #' @export
 #' 
+#' @importFrom purrr cross
+#' @importFrom purrr transpose
+#' 
 configure_simulation <- function(x, models, iters, params, method_sample, method_model, method_results, 
                                  method_pre_model=NULL, method_post_model=NULL, 
                                  globals=NULL, verbose=TRUE) {

R/dispatch-simulations.R

@@ -8,6 +8,8 @@
 #'     each indepdendent set of simulations
 #' @param verbose default TRUE, have the dispatcher tell you what's currently running
 #' 
+#' @importFrom future.apply future_lapply
+#' 
 #' @export
 dispatch_simulations <- function(sim_config, use_future=FALSE, seed=NULL, failure=NULL, verbose=0, ...) {
   if (!"SimConfig" %in% class(sim_config)) {

R/exposure-list.R

@@ -2,10 +2,10 @@
 #'
 #' @param sampled_time_period year that policy is first enacted
 #' @param mo month that policy is first enacted
-#' @available_periods all available time periods in the data
-#' @policy_speed either "instant" for the policy going into immediate effect or "slow"
+#' @param available_periods all available time periods in the data
+#' @param policy_speed either "instant" for the policy going into immediate effect or "slow"
 #'     for the policy effect phasing in over time
-#' @n_implementation_periods used if policy_speed is slow, number of time periods over
+#' @param n_implementation_periods used if policy_speed is slow, number of time periods over
 #'     which to phase in full policy effect
 #'
 #' @export

R/sim-config.R

@@ -11,6 +11,7 @@ SimConfig <- R6::R6Class(
   # PUBLIC
   ###
   public = list(
+
     initialize = function(
       data, models,
       method_sample, method_pre_model, method_model, method_post_model, method_results,