小白最近学习R，遇见一个问题。R程序如下：
coffee<-data.frame(x=c(0,0,1,1,2,2,3,3,4,4,5,5,6,6),
                  y=c(508.1,498.4,568.2,577.3,651.7,657,713.4,697.5,755.3,758.9,787.6,792.1,841.4,931.8)

lm.fit<-lm(y~x+I(x^2),data=coffee)
summary(lm.fit)

xfit<-seq(0,6,len=200)
yfit<-predict(lm.fit, data.frame(x=xfit))
plot(coffe$x,coffe$y)
lines(xfit, yfit)


运行至yfit时出现如下错误：

Error in eval(expr, envir, enclos) : object 'X1' not found


哪里出问题了啊？