RIの場合は、次の行を使用します。
linear <- lm(y~x-1)
Rは、原点を通過する回帰直線を見つけます。
私の質問は、原点はx = 0ですか、それともx値の最小値ですか?
たとえば、私のx値が1998年から2011年の場合、近似直線は1998年または0年までに通過しますか?
式に「-1」を指定すると、傾きは原点を通ります。これは、x=0 の値を予測することで確認できます。
x <- 1998:2011
y <- 3*x+rnorm(length(x))
fit <- lm(y~x-1)
summary(fit)
newdata <- data.frame(x=0:10)
predict(fit,newdata)
@Marcintheboxが指摘しているように、それは原点を通ります。グラフィカルに表示するには:
x <- seq(-5,5)
y <- 3*x+rnorm(length(x))
fit.int <- lm(y~x)
fit <- lm(y~x-1)
summary(fit)
plot(y~x,xlim=c(-.1,.1),ylim=c(-.1,.1))
abline(fit,col="red")
abline(fit.int,col="blue")
abline(h=0)
abline(v=0)