Получение предупреждения: "'newdata' содержит 1 строку, но найденные переменные имеют 32 строки" на Forext.lm

Ответ 1

Это проблема использования разных имен между вашим data и вашим newdata, а не проблемой между использованием векторов или dataframes.

Когда вы подходите к модели с помощью функции lm, а затем используйте predict для создания прогнозов, predict пытается найти те же имена на вашем newdata. В первом случае имя x конфликтует с mtcars$wt и, следовательно, вы получите предупреждение.

Смотрите здесь иллюстрацию того, что я говорю:

Это то, что вы сделали и не получили ошибку:

a <- mtcars$mpg
x <- mtcars$wt

#here you use x as a name
fitCar <- lm(a ~ x) 
#here you use x again as a name in newdata.
predict(fitCar, data.frame(x = mean(x)), interval = "confidence") 

       fit      lwr      upr
1 20.09062 18.99098 21.19027

Посмотрите, что в этом случае вы подходите к своей модели с использованием имени x, а также прогнозируете использование имени x в newdata. Таким образом, вы не получаете никаких предупреждений, и это то, что вы ожидаете.

Посмотрим, что произойдет, когда я изменю имя на что-то еще, когда я подгоню модель:

a <- mtcars$mpg
#name it b this time
b <- mtcars$wt 

fitCar <- lm(a ~ b) 
#here I am using name x as previously
predict(fitCar, data.frame(x = mean(x)), interval = "confidence") 

         fit       lwr      upr
1  23.282611 21.988668 24.57655
2  21.919770 20.752751 23.08679
3  24.885952 23.383008 26.38890
4  20.102650 19.003004 21.20230
5  18.900144 17.771469 20.02882
Warning message:
'newdata' had 1 row but variables found have 32 rows 

Единственное, что я сделал сейчас, это изменить имя x при подгонке модели до b, а затем предсказать, используя имя x в newdata. Как вы можете видеть, я получил ту же ошибку, что и в вашем вопросе.

Надеюсь, теперь это ясно!

Ответ 2

В формуле для функции lm не ссылаются на переменные, используя шаблон данных $varabetename. Вместо этого используйте variablename + variablename... Это не вызовет предупреждения: "newdata" имеет строку nrow (test), но найденные переменные имеют строки nrow (train).

Ответ 3

Для этого без создания имен используется следующее:

fitCar<-lm(mpg ~ wt, mtcars) #here you use x as a name
predict(fitCar,data.frame(wt=mean(mtcars$wt)), interval="confidence") 

Ответ 4

У меня возникла та же проблема, когда я использовал имя переменной в сочетании с именем данных с использованием знака $.

Так что вместо:

fitCar<-lm(mtcars$mpg~mtcars$wt)
predict(fitCar,
        data.frame(x=mean(mtcars$wt)),
        interval="confidence")

Используйте это:

fitCar<-lm(mpg~wt , data = mtcars)
predict(fitCar,  
wt = mean(mtcars$wt), interval = "confidence")