## Using R to add confidence and prediction intervals

Hi,

I'm using R to analyse a data set. I have found confidence intervals and prediction intervals for my data. However i'm having trouble adding the confience intervals and prediction intervals to my scatter graph.

x=c(-0.5,-0.4,-0.3,-0.2,-0.1,0,0.1,0.2,0.3,0.4,0.5)
y=c(8.1,7.8,8.5,9.8,9.5,8.9,8.6,10.2,9.3,9.2,10.5)
plot(x,y,pch=16,xlab="Temp",ylab="Sugar",main="Sug ar remaining after fermentation")
x0=data.frame(x=21.75)
ci=predict(pull.lm1,newdata=x0,interval="conf")
cbind(x0,ci)
pi=predict(pull.lm1,newdata=x0,interval="pred")
cbind(x0,pi)
lines(x0$x, ci[,2],lty=2);lines(x0$x,ci[,3],lty=2)
lines(x0$x, pi[,2],lty=3);lines(x0$x,pi[,3],lty=3)

The last two lines show my attempt at adding the confidence and prediction intervals. These commands arn't working, my graph stays the same. I'd appreciate any help. Thanks.