使用直接标签更改轮廓颜色答案

【问题标题】：Change contour colours using directlabels使用直接标签更改轮廓颜色
【发布时间】：2014-06-16 17:54:40
【问题描述】：

我对 ggplot2 还很陌生，我正在尝试创建一个包含缺失值的数据的等高线图。因为缺少值我不能自己拥有轮廓，所以我将瓷砖背景与轮廓相结合。问题是标签与背景颜色相同。

假设我有这样的数据：

DF1 <- data.frame(x=rep(1:3,3),y=rep(1:3,each=3),z=c(1,2,3,2,3,4,3,NA,NA))

我可以制作这样的情节：

require(ggplot2); require(directlabels)
plotDF <- ggplot(DF1,aes(x,y,z=z)) + geom_tile(aes(fill=z)) + stat_contour(aes(x,y,z=z,colour= ..level..),colour="white")
direct.label(plotDF)

这给了我一个类似于我想要的情节，但我希望能够将标签的颜色更改为黑色。有什么想法吗？

【问题讨论】：

标签： r ggplot2

【解决方案1】：

我发现了一个similar post，并认为这很容易，类似于direct.label(p, list("last.points", colour = "black")。不幸的是，我无法让它工作；我相信，这不是直接支持的。

然后我决定使用黑魔法并设法通过手动覆盖色标来做到这一点：

direct.label(plotDF + 
             scale_colour_gradient(low="black", high="black"))

【讨论】：