This subscript operator is used together with rewrites
to specify
a sequence of transformations to apply to a new function we define.
# S3 method for foolbox_rewrite_spec [(dummy, ...)
dummy | The dummy-table |
---|---|
... | A list of rewrite functions. |
<.foolbox_pipe
rewrites
# This is a very simple inline function that require we # provide the function body as it should be inserted. # For a more detailed version, see the Tutorial vignette. inline <- function(f, fn, body) { body <- substitute(body) rewrite(f) %>% rewrite_with( rewrite_callbacks() %>% add_call_callback(fn, function(expr, ...) body) ) } g <- function(x) x**2 h <- rewrites[inline(g,y**2)] < function(y) y + g(y) h#> function (y) #> y + y^2 #> <environment: 0x102da2e70>