r - 在正方形内绘制geom_tile边界以防止重叠

Question

我希望能够在不重叠的geom_tile上绘制边框，以便边框可以传达自己的信息，而不会使查看者与消失的边框混淆。

library(ggplot2)

state <- data.frame(p=runif(100), x=1:10, y=rep(1:10, each=10), z=rep(1:5, each=20))

ggplot(state, aes(x, y)) + 
  geom_tile(aes(fill = p, color=as.factor(z)), size=2)

我相信您会看到重叠的边界有多混乱。

Answer 1

对width使用height和geom_tile参数创建空间并防止边框重叠。

ggplot(state, aes(x, y)) + 
  geom_tile(aes(fill = p, color=as.factor(z), width=0.7, height=0.7), size=2)

我已经在图块之间创建了空间，但是您也可以调整 width和 height，使边框彼此接触。另外，请注意，在我的图表版本中，图块的颜色图例没有任何颜色。这是因为 geom_tile is broken in ggplot2 2.0的边框颜色图例。该问题已在ggplot2的开发版本中修复，但该修复尚未推出到CRAN。要获得开发版本，可以执行 devtools::install_github("hadley/ggplot2")。

（顺便说一句，如果您陷入错觉，下图将创建 grid illusion）。