使用函数扩展但得到不同的答案

Question

有人可以解释为什么我使用这两个函数对五阶多项式得到不同的答案吗？它们不应该是相同的输出吗？

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)