Может кто-нибудь объяснить, почему я получаю разные ответы для полинома 5-го порядка, используя эти две функции?Разве они не должны быть одинакового выхода?
library(MASS)
out1<-lm(accel~times+ I(times^2) +I(times^3)+ I(times^4)+I(times^5),data=mcycle)
out12<-lm(accel~poly(times,5), data=mcycle)
summary(out1)
summary(out12)