partialised provides a ‘partialised’ class that extends the partialising function of ‘purrr’ by making it easier to change the arguments. This is similar to the function-like object in ‘Julia’ (https://docs.julialang.org/en/v1/manual/methods/#Function-like-objects).
You can install the development version of partialised from GitHub with:
# the released version from CRAN:
install.packages("partialised")
# the development version from GitHub:
# install.packages("devtools")
devtools::install_github("UchidaMizuki/partialised")This is a basic example which shows you how to solve a common problem:
library(partialised)
dist <- function(x, y) {
sqrt(x ^ 2 + y ^ 2)
}
pdist <- new_partialised(dist,
list(x = 3))
pdist
#> <partialised[1]>
#> function (x, y)
#> {
#> sqrt(x^2 + y^2)
#> }
#> (
#> x = 3
#> ...
#> )
pdist(y = 4)
#> [1] 5
arguments(pdist)
#> $x
#> [1] 3
pdist$x
#> [1] 3
pdist$y
#> NULL
pdist$x <- 6
pdist(y = 8)
#> [1] 10
pdist$y <- 8
pdist()
#> [1] 10