使用直接標籤更改輪廓顏色

Question

我對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) 

這給了我類似的情節我想要什麼，但我想成爲能夠將標籤的顏色更改爲黑色。有任何想法嗎？

Answer 1

我發現一個similar post，並認爲這很容易，沿着direct.label(p, list("last.points", colour = "black")行。不幸的是，我無法讓它工作。我相信，這不是直接支持。

然後我決定使用黑魔法和管理的手動更改顏色比例做的伎倆：

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