R 中的对数转换函数

Question

我想执行面板数据回归。在此之前，我计算变量的自然对数。由于某些变量为负，因此对数会产生一些 NA。 此时我想应用一个转换函数，这样就不会丢失数据，基本上是这样的：

Ln(1+EBIT),if EBIT≥ 0 and -Ln(1-EBIT),if EBIT<0

谁能帮我写代码？

Answer 1

ifelse(x>=0, log(1+x), -log(1-x))

请注意，这仍会生成警告，因为 ifelse() 子句的两个分支都已执行。

（我希望你对这种转变有理论依据......）

Answer 2

function(EBIT) sign(EBIT)*log(1+abs(EBIT))