r - 如何用特定颜色表示等高线图(fill.contour)中的最佳区域？

Question

我正在使用 filled.contour绘制等高线图的函数。我想用深色表示最佳值周围的区域，用浅色表示所有其他区域。

library(gplots) 
a <- expand.grid(1:20, 1:20)
b <- matrix(a[, 1] + a[, 2], 20)
filled.contour(x = 1:20, y = 1:20, z = b,
               plot.axes = { axis(1); axis(2); points(10, 10) },
               col = colorpanel(10, "white", "grey10"))

我想用深灰色表示 (10,10) 坐标，用浅色表示所有其他区域。我也试过 RColorBrewer和 colorRampPalette改变梯度，但它没有给出想要的结果。如何改变颜色渐变来实现我的目标？

问候，
阿什瓦尼

Answer 1

填充的等高线实际上是用 layout 设置的两个单独的图。 , 在你的情况下，x 坐标向左移动，感兴趣的区域可以突出显示:

rect(7,9.5,8,10.5,col='red')

您的示例与 ?filled.contour 中的示例非常相似这几乎完全符合您的要求。我想知道这是否是一位教授提出的问题，他想看看他的学生是否真的阅读了他们正在使用的功能的帮助页面。

a <- expand.grid(1:20, 1:20)
b <- matrix(a[,1] + a[,2], 20)
filled.contour(x = 1:20, y = 1:20, z = b,
               plot.axes = { axis(1); axis(2); points(10, 10) })