Добавление точек в слой 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

либо удалите эстетику z с помощью

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))