需要构建多个多项式进行拟合实验，多项式次数从1到n，我想用下面这个表达式构建多个多项式：1次多项式、2次多项式、n次多项式，但是没得到想要的结果，请大家帮忙分析原因
for(i  in 1:n)  { f <-  y ~ poly(x, i) }