Ligne de régression exponentielle dans R

Question

Je tracais des données et essayais de tracer une ligne de régression exponentielle à travers les points de données. J'ai fait beaucoup de recherches sur la façon de le faire, et j'ai finalement trouvé une instruction que je pouvais comprendre et interpréter. Cependant, lorsque j'ai continué à utiliser la même méthode pour d'autres graphiques, la droite de régression ne semblait pas correspondre aux points de données. Je ne pouvais pas comprendre pourquoi. Puis-je obtenir de l'aide s'il vous plaît?

This lien est l'endroit où j'ai trouvé l'instruction.

Voici mes codes et les résultats:

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

Je pense que votre code est bien. Votre problème est simplement que le modèle exponentiel n'est pas un modèle adéquat pour les données, et que l'ajustement est plutôt médiocre.