R中的指数回归线

Question

我正在绘制一些数据，并试图通过数据点绘制指数回归线。我已经做了很多研究如何做到这一点，并最终遇到了一个我能理解和执行的指令。但是，当我继续对其他图使用相同的方法时，回归线似乎不适合数据点。我无法弄清楚为什么。我能得到一些帮助吗？

This链接是我找到指令的地方。

以下是我的代码和结果：

exponential.model <- lm(A~log(B), AB)
bvalues <- seq(0,180,0.1)
exponential <- predict(exponential.model, list(B = bvalues))
plot(A~B, AB, log="y")
lines(bvalues, exponential, lwd = 2, col = "red")

exponential.model <- lm(C~log(D), CD)
dvalues <- seq(0,1380,0.1)
exponential <- predict(exponential.model, list(D = dvalues))
plot(C~D, CD, log="y")
lines(dvalues, exponential, lwd = 2, col = “red”)

Answer 1

我认为您的代码很好。你的问题只是指数模型不适合数据模型，而且拟合度很差。