ggplot2 gösterge alt ve yatay

Question

Bir ggplot2 göstergesini çizimin altına nasıl taşıyabilirim ve yatay olarak nasıl açabilirim?

örnek kod:

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()) 

İstenilen (yaklaşık) sonuç:

Answer 1

aşağıdaki kodu kullanabilirsiniz lütfen göstergenin konumunu taşımak isterseniz:

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") 

Bu size des vermeli sonuç verdi.

Answer 2

Bu soran tam olarak ne size vermez, ama en azından bir araya renkleri koyacağız: Mümkün altta sürekli efsane çubuğu çizmek eğer

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