Question

我正在尝试为我的模型添加一个常量

 exponential <- lm((log(fallpercent$n_activities)~ 
 ((fallpercent$percentabovebelow1 )+3))

这会产生错误

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

我正在尝试创建一个等效于y = e ^{x + 3}的函数。

关于如何做的想法？

Answer 1

如果您愿意，可以在lm中修正截距。我相信以下内容可能对您有所帮助。我使用iris作为示例数据。

首先进行拦截。

fit <- lm(log(Sepal.Length) ~ Sepal.Width, data = iris)
fit

#Call:
#lm(formula = log(Sepal.Length) ~ Sepal.Width, data = iris)

#Coefficients:
#(Intercept)  Sepal.Width  
#    1.88199     -0.04141

现在没有

fit <- lm(log(Sepal.Length) - 1.88199 ~  0 + Sepal.Width, data = iris)
fit

#Call:
#lm(formula = log(Sepal.Length) - 1.88199 ~ 0 + Sepal.Width, data = iris)

#Coefficients:
#Sepal.Width  
   -0.04141

这里，1.88199是你的情况等等。

Answer 2

我正在尝试创建一个等效于y = e ^（x + 3）的函数关于如何做的想法？

您是否只是想创建此功能？

myFunc <- function(x) {
  exp(x + 3)
}

myFunc(2)
[1] 148.4132

R模型适合具有常数吗？

2 个答案: