将图例添加到关卡图答案

【问题标题】：Adding Legends to Level Plots将图例添加到关卡图
【发布时间】：2021-09-23 03:49:37
【问题描述】：

我正在尝试在 R 中制作“关卡图”，我正在按照此处的说明进行操作：https://www.rdocumentation.org/packages/lattice/versions/0.10-10/topics/levelplot

library(lattice)
x <- seq(pi/4, 5 * pi, length = 100)
y <- seq(pi/4, 5 * pi, length = 100)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2) * exp(-r/(pi^3))
levelplot(z~x*y, grid, cuts = 50, scales=list(log="e"), xlab="",
          ylab="", main="Weird Function", sub="with log scales",
          colorkey = FALSE, region = TRUE)

有没有办法给这个情节添加图例？ “rdocumentation”中似乎没有任何关于图例选项的指示。

我在这里找到了一个类似的帖子，展示了如何添加图例：R - How to add legend title to levelplot saved to a variable?

但这似乎是一种添加图例的复杂方法。

真的没有简单的方法可以给这个关卡图添加图例吗？

【问题讨论】：

colorkey = TRUE做你想做的事吗？
@Marcinthebox：谢谢！这已经解决了问题！您想输入完整的答案，以便未来的读者可以看到如何解决问题吗？或者你想让我为你做吗？非常感谢您的帮助！
没问题 - 我已添加示例作为答案。干杯

标签： r plot data-visualization lattice

【解决方案1】：

您只需分配colorkey = TRUE:

levelplot(z~x*y, grid, cuts = 50, scales=list(log="e"), xlab="",
          ylab="", main="Weird Function", sub="with log scales",
          colorkey = TRUE, region = TRUE)

【讨论】：