回帰を適合させています(y )。指数変換によって変換ポイントの推定値(および信頼性/予測間隔)を逆算することは有効ですか?E [ f (X )] ≠ f (E [ X ] )なので、私はそうは思わないが、他の人の意見が欲しかった。
以下の私の例は、逆変換との競合を示しています(.239対.219)。
set.seed(123)
a=-5
b=2
x=runif(100,0,1)
y=exp(a*x+b+rnorm(100,0,.2))
# plot(x,y)
### NLS Fit
f <- function(x,a,b) {exp(a*x+b)}
fit <- nls(y ~ exp(a*x+b), start = c(a=-10, b=15))
co=coef(fit)
# curve(f(x=x, a=co[1], b=co[2]), add = TRUE,col=2,lwd=1.2)
predict(fit,newdata=data.frame(x=.7))
[1] 0.2393773
### LM Fit
# plot(x,log(y))
# abline(lm(log(y)~x),col=2)
fit=lm(log(y)~x)
temp=predict(fit,newdata=data.frame(x=.7),interval='prediction')
exp(temp)
fit lwr upr
1 0.2199471 0.1492762 0.3240752
1
これは、ログリンクされたガウスGLMによって解決される問題の1つではありませんか?
—
generic_user 2014
@ARMはい、そう思います。ご指摘いただきありがとうございます。ただし、GLMを使用すると予測間隔を取得するのが難しくなりますが、うまくいくと思います。
—
グレン
@GlenこのサイトでDuanにじみを検索します。
—
Dimitriy V.Masterov 2014