r - 带有转换的 R lm() 公式的格式

Question

我不太清楚如何在一行中执行以下操作:

data(attenu)
x_temp = attenu$accel^(1/4)
y_temp = log(attenu$dist)
best_line = lm(y_temp ~ x_temp)

由于上述工作，我认为我可以做到以下几点:

data(attenu)
best_line = lm( log(attenu$dist) ~ (attenu$accel^(1/4)) )

但这给出了错误:

Error in terms.formula(formula, data = data) : invalid power in formula

在 R 的公式格式中使用转换后的变量时，显然我遗漏了一些东西。为什么这不起作用？

Answer 1

您正在寻找函数 I使^运算符在公式中被视为算术，即。

x <- runif(1:100)
y <- x + rnorm(100,0, 3)
lm(log(y) ~ I(x^(1/4))