11

近似二次曲線をプロットに追加しようとしています。

abline(lm(data~factor+I(factor^2)))

表示される回帰は 2 次ではなく線形であり、次のメッセージが表示されます。

Message d'avis : In abline(lm(data ~ factor + I(factor^2)), col = palette[iteration]) : utilization des deux premiers des 3 係数 de regression

つまり:

3 つの回帰係数のうち最初の 2 つの使用

関数のみを実行するlm()と、メッセージが表示されません。

サンプルデータは次のとおりです。

factor <- 1:7
data <- c(0.1375000,0.2500000,0.3416667,0.4583333,0.7250000,0.9166667,1.0000000)
4

3 に答える 3

3

私が使用したデータセットには増加していないx値があるため、これまでのところ答えを得ることができませんでした（上記のDavid Robinsonが述べたように）。これが私がそれを解決した方法です...

require(ISLR)
plot(mpg~horsepower, data=Auto)

# fit the model
glm.fit = glm(mpg~poly(horsepower,2), data=Auto)

# create 100 x-values based on min/max of plotted values
minMax = range(Auto$horsepower)
xVals = seq(minMax[1], minMax[2], len = 100) 

# Use predict based on a dataframe containing 'horsepower'
yVals = predict(glm.fit, newdata = data.frame(horsepower = xVals))

lines(xVals, yVals)
于 2014-02-18T20:47:08.150 に答える
0

これらすべての貴重な回答に感謝します。注意してください：

使用する

「馬力」を含むデータフレームに基づいて予測を使用する

yVals = predict(glm.fit, newdata = data.frame(horsepower=xVals)

「馬力」を含むデータフレームに基づいて予測を使用する

yVals = predict(lm.fit, newdata = data.frame(horsepower=xVals)

lm.fit関数です

于 2015-03-12T10:09:09.497 に答える