R 将新点添加到ggplot2中的等高线图中

我正在尝试使用ggplot2在现有等高线图上绘制一些额外的点：

require(ggplot2)
library(reshape2) # for melt
volcano3d <- melt(volcano)
names(volcano3d) <- c("x", "y", "z")
v <- ggplot(volcano3d, aes(x, y, z = z))
v <- v + stat_contour()
print(v)
newdata <- data.frame(x = runif(7)*60, y = runif(7)*60)
v <- v + geom_point(data=newdata, aes(x, y))
print(v)

require（ggplot2）
库（重塑2）#用于熔化
在上次分配的
aes（）
中添加
z=0
。绘图需要3个坐标，因此无法放置点。
ggplot（火山3D，aes（x，y））+stat_轮廓（aes（z=z））+geom_点（data=newdata）
。您还应该在问题中添加错误消息。