使用ggplot2

Question

我想用ggplot2绘制指数模型的95％置信区间。我使用以下代码

x <- seq(1,3,0.01)
y <- exp(x)+ rnorm(n=length(x))
exp.model <- lm(log(y)~x)
predictions <- predict(exp.model, interval="confidence")
df <-  data.frame(x,y,exp(predictions))
p <- ggplot(data=df, aes(x=x, y=y)) +
     geom_point() + 
     geom_smooth(aes(y=fit, ymin=lwr, ymax=upr), stat="identity")
print(p)

我得到带有置信带的拟合指数模型，但我收到了警告

Warning: Ignoring unknown aesthetics: ymin, ymax

我的问题是如何避免这种警告？