infinito - Resolviendo para el inverso de una función en R

generar variables aleatorias en r

Question

¿Hay alguna forma para que R resuelva la inversa de una función de variable única dada? La motivación es que luego le diga a R que use un vector de valores como entradas de la función inversa para que pueda escupir los valores de la función inversa.

Por ejemplo, tengo la función y(x) = x^2 , la inversa es y = sqrt(x) . ¿Hay alguna forma en que R pueda resolver la función inversa?

Busqué uniroot() , pero no estoy resolviendo el cero de una función.

Cualquier sugerencia sería útil.

¡Gracias!

Answer 1

¿Qué tipo de inverso estás encontrando? Si está buscando un inverso simbólico (por ejemplo, una función y que es idénticamente igual a sqrt (x)) tendrá que usar un sistema simbólico. Busque en ryacas una biblioteca R para conectarse con un sistema de álgebra computacional que probablemente pueda calcular inversos, Yacas.

Ahora, si solo necesita calcular inversos puntuales, puede definir su función en términos de uniroot como lo ha escrito:

> inverse = function (f, lower = -100, upper = 100) {
function (y) uniroot((function (x) f(x) - y), lower = lower, upper = upper)[1]
}
> square_inverse = inverse(function (x) x^2, 0.1, 100)
> square_inverse(4)
[1] 1.999976

Para una y y f(x) dadas, esto calculará x tal que f(x) = y , también conocido como inverso.