Fix #1426

Author: wlandau

NEWS.md

@@ -3,6 +3,7 @@
 ## Changes to default settings
 
 * In `tar_option_get()`, set `repository_meta` to `"local"` by default, regardless of `repository` (#1427).
+* In `tar_option_get()`, set `storage = "worker"`, `retrieval = "worker"`, and `memory = "tranisient"` by default (#1426).
 
 ## Other changes
 

R/class_options.R

@@ -312,7 +312,7 @@ options_class <- R6::R6Class(
       self$error %|||% "stop"
     },
     get_memory = function() {
-      self$memory %|||% "auto"
+      self$memory %|||% "transient"
     },
     get_garbage_collection = function() {
       self$garbage_collection %|||% 1000L
@@ -330,10 +330,10 @@ options_class <- R6::R6Class(
       self$resources %|||% list()
     },
     get_storage = function() {
-      self$storage %|||% "main"
+      self$storage %|||% "worker"
     },
     get_retrieval = function() {
-      self$retrieval %|||% "main"
+      self$retrieval %|||% "worker"
     },
     get_cue = function() {
       self$cue %|||% tar_cue()

R/tar_target.R

@@ -277,15 +277,15 @@
 #'   to learn how to debug targets using saved workspaces.)
 #' @param memory Character of length 1, memory strategy. Possible values:
 #'
+#'   * `"transient"` (default): the target gets unloaded
+#'     after every new target completes.
+#'     Either way, the target gets automatically loaded into memory
+#'     whenever another target needs the value.
 #'   * `"persistent"`: the target stays in memory
 #'     until the end of the pipeline (unless `storage` is `"worker"`,
 #'     in which case `targets` unloads the value from memory
 #'     right after storing it in order to avoid sending
 #'     copious data over a network).
-#'   * `"transient"`: the target gets unloaded
-#'     after every new target completes.
-#'     Either way, the target gets automatically loaded into memory
-#'     whenever another target needs the value.
 #'   * `"auto"`: new in `targets` version 1.8.0.9011, `memory = "auto"`
 #'     is equivalent to `memory = "transient"` for dynamic branching
 #'     (a non-null `pattern` argument) and `memory = "persistent"`
@@ -331,9 +331,9 @@
 #'   is saved to storage. Only relevant when using `targets`
 #'   with parallel workers (<https://books.ropensci.org/targets/crew.html>).
 #'   Must be one of the following values:
+#'   * `"worker"` (default): the worker saves/uploads the value.
 #'   * `"main"`: the target's return value is sent back to the
 #'     host machine and saved/uploaded locally.
-#'   * `"worker"`: the worker saves/uploads the value.
 #'   * `"none"`: `targets` makes no attempt to save the result
 #'     of the target to storage in the location where `targets`
 #'     expects it to be. Saving to storage is the responsibility
@@ -344,9 +344,9 @@
 #'   depends on.) Only relevant when using `targets`
 #'   with parallel workers (<https://books.ropensci.org/targets/crew.html>).
 #'   Must be one of the following values:
+#'   * `"worker"` (default): the worker loads the target's dependencies.
 #'   * `"main"`: the target's dependencies are loaded on the host machine
 #'     and sent to the worker before the target runs.
-#'   * `"worker"`: the worker loads the target's dependencies.
 #'   * `"none"`: `targets` makes no attempt to load its
 #'     dependencies. With `retrieval = "none"`, loading dependencies
 #'     is the responsibility of the user. Use with caution.

man/tar_option_set.Rd

@@ -260,11 +260,11 @@ tar_test("deprecated error = \"workspace\"", {
 
 tar_test("memory", {
   x <- options_init()
-  expect_equal(x$get_memory(), "auto")
-  x$set_memory("transient")
   expect_equal(x$get_memory(), "transient")
+  x$set_memory("persistent")
+  expect_equal(x$get_memory(), "persistent")
   x$reset()
-  expect_equal(x$get_memory(), "auto")
+  expect_equal(x$get_memory(), "transient")
   expect_error(x$set_memory("invalid"), class = "tar_condition_validate")
 })
 
@@ -339,21 +339,21 @@ tar_test("resources", {
 
 tar_test("storage", {
   x <- options_init()
-  expect_equal(x$get_storage(), "main")
-  x$set_storage("worker")
   expect_equal(x$get_storage(), "worker")
-  x$reset()
+  x$set_storage("main")
   expect_equal(x$get_storage(), "main")
+  x$reset()
+  expect_equal(x$get_storage(), "worker")
   expect_error(x$set_storage("invalid"), class = "tar_condition_validate")
 })
 
 tar_test("retrieval", {
   x <- options_init()
-  expect_equal(x$get_retrieval(), "main")
-  x$set_retrieval("worker")
   expect_equal(x$get_retrieval(), "worker")
-  x$reset()
+  x$set_retrieval("main")
   expect_equal(x$get_retrieval(), "main")
+  x$reset()
+  expect_equal(x$get_retrieval(), "worker")
   expect_error(x$set_retrieval("invalid"), class = "tar_condition_validate")
 })
 

man/tar_target.Rd

@@ -153,11 +153,11 @@ tar_test("deprecated error = \"workspace\"", {
 })
 
 tar_test("memory", {
-  expect_equal(tar_option_get("memory"), "auto")
-  tar_option_set(memory = "transient")
   expect_equal(tar_option_get("memory"), "transient")
+  tar_option_set(memory = "persistent")
+  expect_equal(tar_option_get("memory"), "persistent")
   tar_option_reset()
-  expect_equal(tar_option_get("memory"), "auto")
+  expect_equal(tar_option_get("memory"), "transient")
   expect_error(
     tar_option_set(memory = "invalid"),
     class = "tar_condition_validate"
@@ -255,23 +255,23 @@ tar_test("resources", {
 })
 
 tar_test("storage", {
-  expect_equal(tar_option_get("storage"), "main")
-  tar_option_set(storage = "worker")
   expect_equal(tar_option_get("storage"), "worker")
-  tar_option_reset()
+  tar_option_set(storage = "main")
   expect_equal(tar_option_get("storage"), "main")
+  tar_option_reset()
+  expect_equal(tar_option_get("storage"), "worker")
   expect_error(
     tar_option_set(storage = "invalid"),
     class = "tar_condition_validate"
   )
 })
 
 tar_test("retrieval", {
-  expect_equal(tar_option_get("retrieval"), "main")
-  tar_option_set(retrieval = "worker")
   expect_equal(tar_option_get("retrieval"), "worker")
-  tar_option_reset()
+  tar_option_set(retrieval = "main")
   expect_equal(tar_option_get("retrieval"), "main")
+  tar_option_reset()
+  expect_equal(tar_option_get("retrieval"), "worker")
   expect_error(
     tar_option_set(retrieval = "invalid"),
     class = "tar_condition_validate"