我对在非线性模型中。
下面是一些数据和两个双曲线拟合。一种估计两个参数的方法(模型),另一种是其中一个参数固定为,并且仅估计其他参数(模型)。模型具有更小的残差标准误差(上df) 比(上df) 并且仅仅通过查看它(见下图),比(虽然本身可以改进)。anova() 报告的残差平方和为为了和为了. 有一个 df 差异,产生 SS 残差差异的 p 值.
残差平方和和眼球拟合的差异并不奇怪。
然而,的(约束模型)要好得多(通过平方预测值和观测值的相关性来计算(可能不正确))。具有观察到的和预测的 Y 值的平方相关, 然而有.
是对这些模型有用吗?可以根据以下标准区分这些模型吗(例如,指数模型可能是竞争模型,我们可以检查该模型的)。
我对此感到好奇,因为在我的文献角落里,这些类型的模型是基于证据,我也不明白约束如何改进在这个情况下。
test <- data.frame(x=c(1,10,50,100),y=c(57.7,28.0,17.8,14.8))
m1 <- nls(y ~ a / (1+b*x),test,start=list(a=200,b=.07))
m2 <- nls(y ~ 100 / (1+b*x),test,start=list(b=.07))
coeffm1 <- coefficients(m1)
coeffm2 <- coefficients(m2)
summary(m1)
summary(m2)
anova(m1,m2)
test$m1pred <- fitted(m1)
test$m2pred <- fitted(m2)
cor(test$y,test$m1pred)^2
cor(test$y,test$m2pred)^2
plot(test$x,test$y,ylim=c(0,60))
curve((y=coeffm1["a"] / (1+coeffm1["b"]*x)),add=T)
curve((y=100 / (1+coeffm2["b"]*x)),add=T,lty="dashed")
实线为模型m1,虚线为模型m2。m1的眼球贴合度优于m2。