如何在R中反双曲正弦变换？ [英] How to reverse inverse hyperbolic sine transformation in R?

问题描述

使用反双曲正弦变换的变换可以使用以下简单函数在R中完成：

ihs <- function(x) {
    y <- log(x + sqrt(x ^ 2 + 1))
    return(y)
}

但是，我找不到逆转这种转换的方法。所以我的问题是：如何在R中反双曲正弦变换？

推荐答案

反双曲正弦的逆是双曲正弦，因此您可以使用：

sinh(x)

如果您想要自己求逆函数，这应该会对您有帮助：

hs <- function(x) {
    y <- 0.5*exp(-x)*(exp(2*x)-1)
    return(y)
}

这篇关于如何在R中反双曲正弦变换？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！