Добавление точек в слой geom_tile в ggplot2

Question

В R 2.13.1/ggplot2 0.8.9, я пытаюсь добавить точки на слой geom_tile. В этом примере воспроизводится ошибка.

volcano3d <- melt(volcano) 
names(volcano3d) <- c("x", "y", "z") 
pts <- data.frame(a=runif(10,0,80), b=runif(10,0,60)) 
v <- ggplot(volcano3d, aes(x, y, z = z)) 

v + geom_tile(aes(fill = z)) 
# works fine 

v + geom_tile(aes(fill = z)) + geom_point(data=pts, aes(x=a, y=b)) 
# Error in eval(expr, envir, enclos) : object 'z' not found 

Любая идея о том, что не так?

Answer 1

либо Unmap Зета эстетики с

v + geom_tile(aes(fill = z)) + geom_point(data=pts, aes(x=a, y=b,z=NULL)) 

или просто удалить его с первого ggplot вызова

v <- ggplot(volcano3d, aes(x, y)) 
v + geom_tile(aes(fill = z)) + geom_point(data=pts, aes(x=a, y=b))