R/reflection.R

Defines functions fold reflect

Documented in fold reflect

reflect=function(f,...)
{
    function(x,...) ifelse(x>0, f(x,...), f(-x,...))/2
}
fold=function(f,...)
{
    function(x,...) ifelse(x>=0, f(x,...)+f(-x,...), 0)
}

Try the pi0 package in your browser

Any scripts or data that you put into this service are public.

pi0 documentation built on May 2, 2019, 4:47 p.m.