func - tools for function development
usage
-
func_load(): load default parameter values for a function or vector/list of functions
mars <- function() 5
venus <- function(z = mars(), m = list(goo = "bar"), v = function(e) e) {
list(z, z, v)
}
mars()
#> [1] 5
venus()
#> [[1]]
#> [1] 5
#>
#> [[2]]
#> [1] 5
#>
#> [[3]]
#> function (e)
#> e
#> <environment: 0x12d80ddb8>
z
#> Error: object 'z' not found
m
#> Error: object 'm' not found
v
#> Error: object 'v' not found
func_load(venus)
class(z); z
#> [1] "numeric"
#> [1] 5
class(m); m
#> [1] "list"
#> $goo
#> [1] "bar"
class(v); v
#> [1] "function"
#> function (e)
#> e
#> <environment: 0x12d95ce78>-
func_load_path(): same asfunc_load(), but for functions in a file
tmpf <- tempfile(fileext=".R")
cat("myfunc <- function() 2\nfun <- function(bar = 5, zzz = myfunc()) bar + 1\n", file=tmpf)
func_load_path(path=tmpf)
bar
#> [1] 5
zzz
#> [1] 2Meta
- Please report any issues or bugs.
- License: MIT
- Please note that this project is released with a Contributor Code of Conduct. By participating in this project you agree to abide by its terms.