ggplot2图例底部和水平

如何将ggplot2图例移动到图的底部并水平翻转?

示例代码:

library(reshape2) # for melt df <- melt(outer(1:4, 1:4), varnames = c("X1", "X2")) p1 <- ggplot(df, aes(X1, X2)) + geom_tile(aes(fill = value)) p1 + scale_fill_continuous(guide = guide_legend()) 

期望的(近似的)结果: 在这里输入图像说明

如果你想移动图例的位置,请使用下面的代码:

 library(reshape2) # for melt df <- melt(outer(1:4, 1:4), varnames = c("X1", "X2")) p1 <- ggplot(df, aes(X1, X2)) + geom_tile(aes(fill = value)) p1 + scale_fill_continuous(guide = guide_legend()) + theme(legend.position="bottom") 

这应该给你想要的结果。 传说在底部

这并不完全符合你的要求,但至less会把颜色放在一起:

 +theme(legend.position="bottom",legend.direction="vertical")