将单点绘制为连续栅格

Question

我有一个模型针对任意点预测的值。现在，这些已由df1

进行了仿真

# create some data
df1 <- data.frame(x=rep(seq(0,10),each=11),
  y=rep(seq(10,20),times=11))
df1$z <- (.1*df1$x^2+df1$y)

# plot as points
library("ggplot2")
ggplot(mapping=aes(x=x,y=y,size=5,color=z),data=df1)+
 geom_point()

我如何绘制z（作为x和y的函数）而不是仅点的连续图（如“热图”）？