如何在填充等高线图中绘制水平线并标记它？

Question

我有以下等高线图

x <- c(0,25,50,75,100)
y <- c(0,10,20)
z <- matrix(c(12,12,13,12,5,12,5,5,5,12,5,12,13,14,15), nrow = 5, ncol = 3, byrow = TRUE)
A <- matrix(seq(0, 100, by = 25), nrow = 3, ncol = 5, byrow = TRUE) #As x
B <- matrix(seq(0,20, by = 10), nrow = 3, ncol = 5) #As y
filled.contour(x,y,z, color=terrain.colors,#
  plot.axes = { axis(1); axis(2); points(A,B)})

如何在值为 5 的水平周围绘制一条水平线并对其进行标记并获得如下内容：

Answer 1

library(fields)
library(emdbook)

x <- c(0,25,50,75,100)
y <- c(0,10,20)
z <- matrix(c(12,12,13,12,5,12,5,5,5,12,5,12,13,14,15), nrow = 5, ncol = 3, byrow = TRUE)
A <- matrix(seq(0, 100, by = 25), nrow = 3, ncol = 5, byrow = TRUE) #As x
B <- matrix(seq(0,20, by = 10), nrow = 3, ncol = 5) #As y


image.plot(x,y,z)
contour(x,y,z,
    add=TRUE, lwd=2, cex=2)

Answer 2

您可以在 plot.axes 中使用 contour。不可能恰好在 5 处添加该行，因此我改用 5.01 并指定 labels。至少这是原则。

filled.contour(x, y, z, color = terrain.colors,
               plot.axes = {axis(1); axis(2); points(A, B);
                 contour(x, y, z, levels = 5.01, labels = "5", col = "red", add = TRUE)})

如何在填充等高线图中绘制水平线并标记它？

How to draw a level line in a filled contour plot and label it?

customization

r

contour

fill