R 如何从模型固定效果生成表达式？

我在一个对象中使用了lmer的固定效果fixed.effects3，我想制作一个表达式，用作曲线打印的公式。我试过这个：

math.growth <- expression(eval(fixed.effects3[1]) + x*eval(fixed.effects3[2]) + x^2*eval(fixed.effects3[3]))

---

有人能告诉我我做错了什么吗？

这里是一个使用包含的数据集的简单示例，将其扩展到您的案例应该非常简单；如果您像下面那样使用全局赋值，请确保使用一个模糊的变量名：

fe<<-fixef(lmer(Reaction ~ Days + (1|Subject) + (0+Days|Subject), sleepstudy))
fef<-function(x) fe[1] + fe[2]*x
curve(fef, from = 1, to = 10)

---

下面是一个使用包含的数据集的简单示例，将其扩展到您的案例应该非常简单；如果您像下面那样使用全局赋值，请确保使用一个模糊的变量名：

fe<<-fixef(lmer(Reaction ~ Days + (1|Subject) + (0+Days|Subject), sleepstudy))
fef<-function(x) fe[1] + fe[2]*x
curve(fef, from = 1, to = 10)

曲线也可以取一个函数；这应该更简单。曲线也可以取一个函数；这应该更直接。