targets_mgrs_NA.md

https://rstats.me/@mdsumner/115799559196647285

    targets::tar_script({
      library(tarchetypes)
      tar_option_set(packages = c("geographiclib"), format = "qs")
   
      tar_assign({
        x <- c(-25, -7.6) |> tar_target()
        y <- c(-76, -70.7) |> tar_target()
        codes <- geographiclib::mgrs_fwd(cbind(x, y), 0L) |> tar_target(pattern = map(x, y))
        coderev <- geographiclib::mgrs_rev(codes) |> tar_target(pattern = map(codes))
      })
    })
    targets::tar_make()

tar_read(coderev)$square_100km


# + x dispatched
# ✔ x completed [9ms, 84 B]
# + y dispatched
# ✔ y completed [1ms, 84 B]
# + codes declared [2 branches]
# ✔ codes completed [0ms, 162 B]
# + coderev declared [2 branches]
# ✔ coderev completed [0ms, 706 B]
# ✔ ended pipeline [383ms, 6 completed, 0 skipped]
# [1] "NA" "NB"