如果圖例位置是底部，我怎樣才能將圖例標題放在標籤的頂部？

Question

例子：

xy <- data.frame(x=1:10, y=10:1, type = rep(LETTERS[1:2], each=5)) 

plot <- ggplot(data = xy)+ 
    geom_point(aes(x = x, y = y, color=type)) + 
    theme(legend.position = 'bottom') 

plot 

我們怎樣才能獲得標題「類型」 A和B的頂部，而不是給他們留下？

感謝

Answer 1

你可以擺脫使用指南（）你的問題，並指定標題的位置。

library(ggplot2) 
xy <- data.frame(x=1:10, y=10:1, type = rep(LETTERS[1:2], each=5)) 

plot <- ggplot(data = xy)+ geom_point(aes(x = x, y = y, color=type)) + 
     theme(legend.position = 'bottom') + 
     guides(colour = guide_legend(title.position = "top")) 

plot 

雖然這是舊的，我注意到，這個答案 Legend title position in ggplot2是好的呢，即使是GGPLOT2現在很多版本在0.9以上。 我注意到不再需要調用庫（尺度）。 希望這會有所幫助