R/inverse.R

Defines functions inverse

inverse = function(fn, interval = NULL, lower = min(interval), upper = max(interval), ...){
    Vectorize(function(y){
        uniroot(f=function(x){fn(x)-y}, lower=lower, upper=upper, ...)$root
    })
}
leeskelvin/astro documentation built on July 26, 2019, 7:49 a.m.