我正在创建一些地图,并希望删除绘图区域和面板边框之间的所有边距。
这是重现我的问题的最小例子
library(ggplot2)
library(grid)
df <- expand.grid(list(x = seq(1, 10), y = seq(1, 10), z = seq(1, 2)))
p <- ggplot(df) + geom_tile(aes(x, y)) + facet_wrap(~z)
p <- p + theme_minimal() + xlab('') + ylab('')
p <- p + theme(axis.text = element_blank(),
panel.grid = element_blank(),
axis.ticks = element_blank(),
panel.border = element_rect(colour = 'black', fill = 'transparent'),
panel.margin = unit(0, 'mm'))
p + ylim(2, 6) + xlim(2, 6)
这是我的代码的结果。
如何删除上图中的所有白色区域?感谢您的任何建议。
答案 0 :(得分:21)
(好的,这是我的评论作为答案..)
只需在剧情中添加以下内容:
+ scale_y_continuous(expand = c(0,0)) + scale_x_continuous(expand = c(0,0))