diff --git a/R/class_crew.R b/R/class_crew.R index 4c4db331..5d68772a 100644 --- a/R/class_crew.R +++ b/R/class_crew.R @@ -217,7 +217,6 @@ crew_class <- R6::R6Class( } else { self$controller$wait( mode = "one", - seconds_interval = 0.5, seconds_timeout = 0.5, scale = TRUE, throttle = TRUE @@ -308,7 +307,6 @@ crew_summary <- function(controller) { summary <- controller$summary() data_frame( controller = summary$controller, - worker = summary$worker, seconds = summary$seconds, targets = summary$tasks ) @@ -318,7 +316,7 @@ database_crew <- function(path_store) { database_init( path = file.path(path_meta_dir(path_store), "crew"), subkey = file.path(basename(path_meta("")), "crew"), - header = c("controller", "worker", "seconds", "targets"), + header = c("controller", "seconds", "targets"), integer_columns = "targets", numeric_columns = "seconds" ) diff --git a/R/tar_crew.R b/R/tar_crew.R index 9ab2162d..3a12c0ed 100644 --- a/R/tar_crew.R +++ b/R/tar_crew.R @@ -5,11 +5,12 @@ #' where a `crew` controller was started, get summary-level information #' of the workers. #' @inheritSection tar_meta Storage access -#' @return A data frame one row per `crew` worker and the following columns: +#' @return A data frame one row per `crew` controller +#' (potentially multiple rows if `tar_option_get("controller")` +#' is a controller group) and the following columns: #' * `controller`: name of the `crew` controller. -#' * `launches`: number of times the worker was launched. -#' * `seconds`: number of seconds the worker spent running tasks. -#' * `targets`: number of targets the worker completed and delivered. +#' * `targets`: number of times the controller attempted to run a target. +#' * `seconds`: number of seconds the workers spent running tasks. #' @inheritParams tar_validate #' @examples #' if (identical(Sys.getenv("TAR_EXAMPLES"), "true")) { # for CRAN diff --git a/man/tar_crew.Rd b/man/tar_crew.Rd index c91b7b1d..e8986891 100644 --- a/man/tar_crew.Rd +++ b/man/tar_crew.Rd @@ -17,12 +17,13 @@ about how to set the data store path persistently for a project.} } \value{ -A data frame one row per \code{crew} worker and the following columns: +A data frame one row per \code{crew} controller +(potentially multiple rows if \code{tar_option_get("controller")} +is a controller group) and the following columns: \itemize{ \item \code{controller}: name of the \code{crew} controller. -\item \code{launches}: number of times the worker was launched. -\item \code{seconds}: number of seconds the worker spent running tasks. -\item \code{targets}: number of targets the worker completed and delivered. +\item \code{targets}: number of times the controller attempted to run a target. +\item \code{seconds}: number of seconds the workers spent running tasks. } } \description{