Compute the functional inverse of a warping function \(\gamma\), i.e., find \(\gamma^{-1}\) such that \(\gamma(\gamma^{-1}(t)) = t\).
Examples
t <- seq(0, 1, length.out = 50)
gamma <- t^2
gamma_inv <- warp.inverse(gamma, t)
Compute the functional inverse of a warping function \(\gamma\), i.e., find \(\gamma^{-1}\) such that \(\gamma(\gamma^{-1}(t)) = t\).
t <- seq(0, 1, length.out = 50)
gamma <- t^2
gamma_inv <- warp.inverse(gamma, t)