R中具有许多0的数据的反双曲正弦变换

Question

我正在尝试对数据集中的非正态变量使用反双曲自 (IHS) 变换。我在互联网上找到的代码对我不起作用。这是我尝试过的：

ihs <- function(col) { 
                transformed <- log((col) +  (sqrt(col)^2+1));
                return(transformed)
                }

col 指的是我要转换的数据框中的列。

Answer 1

如果你有一个数值向量x，你可以使用asinh()函数：

x = seq(-10, 10, 1)
x_ihs = asinh(x)

如果您想定义自己的函数来手动完成，请使用：

my_asinh <- function(var) { var_ihs = log(var + sqrt(var^2+1)); return(var_ihs) }
x_ihs2 = my_asinh(x)

如果没有更多信息，尚不清楚为什么您的代码不起作用，但希望这个答案可以帮助其他有相同问题的人。