filled.contour vs. ggplot2 + stat_contour

Question

我是ggplot2的新手，我正在尝试使用ggplot2复制我使用filled.contour创建的图表。

下面是我的代码：

require(ggplot2)
require(reshape2)

#data prep
scale <- 10

xs <- scale * c(0, 0.5, 0.8, 0.9, 0.95, 0.99, 1)
ys <- scale * c(0, 0.01, 0.05, 0.1, 0.2, 0.5, 1)

df <- data.frame(expand.grid(xs,ys))
colnames(df) <- c('x','y')
df$z <- ((scale-df$x) * df$y) / ((scale-df$x) * df$y + 1)

#filled contour looks good
filled.contour(xs, ys, acast(df, x~y, value.var='z'))

#ggplot contour looks bad
p <- ggplot(df, aes(x=x, y=y, z=z))

p + stat_contour(geom='polygon', aes(fill=..level..))

我无法弄清楚如何让ggplot轮廓一直填充到左上角的多边形（在（0,10）处有一个点，其中z = 0.99）。我得到的是这些奇怪的三角形

Answer 1

要创建ggplot版本的filled.contour版本，您需要比示例中的data.frame对象更大df并使用{{ 1}}将产生您正在寻找的情节。请考虑以下事项：

geom_tile