这是来自文档站点的代码片段:
# Generate data
library(reshape2) # for melt
volcano3d <- melt(volcano)
names(volcano3d) <- c("x", "y", "z")
# Basic plot
v <- ggplot(volcano3d, aes(x, y, z = z))
v + stat_contour(binwidth = 10)
输出:
如果我想在自定义级别绘制等高线怎么办?例如,在volcano3d 数据集中,我希望指示这些级别:z == 120、140、160。