如何将等高线添加到平铺图

Question

我有一组模型预测的数据。我正在用 geom_tile().

绘制它

df1 <- data.frame(x=rep(seq(0,10,by=.1),each=101),
                    y=rep(seq(10,20,by=.1),times=101))
df1$z <- ((.1*df1$x^2+df1$y)-10)/20

library("ggplot2")
ggplot(mapping=aes(x=x,y=y,size=5,color=z),data=df1)+
  geom_point(size = 16, shape = 15) 

ggplot(df1, aes(x, y, fill="blue",alpha = z)) + geom_tile()

如何在特定值（例如 z=0.9、0.95、0.99）处添加一些轮廓线？或者，geom_tile 可以更改为任何合适的连续/轮廓/光栅图函数。

Answer 1

ggplot(df1, aes(x, y, z = z, fill = z))+
  geom_tile()+
  geom_contour()

如何将等高线添加到平铺图

How to add contour line to tile plot

r

ggplot2

tile