git
GitHub
NULL
[[]]
$
@
slot()
dplyr::case_when
try()
suppressWarnings()
suppressMessages()
purrr
map_*()
map2_*()
walk()
imap()
pmap()
reduce()
map_df*()
pluck()
flatten()
NextMethod()
$print()
lubridate::period()
lobstr::ast():
recurse_call()
expr()
exprs()
enexpr()
enexprs()
ensym()
ensyms()
exec()
do.call
source()
...
base::subset()
browser()
recover()
debug()
callr::r()
dump.frames()
do.call(what, args)
what
args
nrow(mtcars) #> [1] 32 mtcars3 <- do.call("rbind", list(mtcars, mtcars, mtcars)) nrow(mtcars3) #> [1] 96
One way to implement exec is shown here: Describe how it works. What are the key ideas?
exec
exec_ <- function(f, ..., .env = caller_env()){ args <- list2(...) do.call(f, args, envir = .env) }