2014-01-25 116 views
1

使用鑽石數據集和下面的代碼我創建了下圖。更改多個ggplot圖例中的標籤

ggplot(diamonds[diamonds$color == c("D", "E", "F"),], aes(x=carat, y=price, shape = color, color=cut)) + 
    geom_point() 

enter image description here

我想傳說標籤(未標題)更改爲其他比他們目前的一些東西。

我一直在努力的代碼(下)單個傳奇

ggplot(diamonds[diamonds$color == c("D", "E", "F"),], aes(x=carat, y=price, shape = color, color=cut)) + 
    geom_point() + 
    scale_shape_manual(lables = c("DDD", "EEE", "FFF")) 

但得到這個錯誤:

Error in discrete_scale(aesthetic, "manual", pal, ...) : 
    unused argument (lables = c("DDD", "EEE", "FFF")) 

如何指定要更改的傳說時有兩個?

感謝

回答

2

或者你可以使用的因素來改變每個級別

diamonds2 <- diamonds[diamonds$color == c("D", "E", "F"),] 
diamonds2$color <- factor(diamonds2$color, levels = c('D', 'E', 'F'), labels = c("DDD", "EEE", "FFF")) 

ggplot(diamonds2, aes(x=carat, y=price, shape = color, color=cut)) + 
    geom_point() 
3

如果傳遞values以及對scale_shape_manual您可以更改圖例標籤。

ggplot(diamonds[diamonds$color == c("D", "E", "F"),], aes(x=carat, y=price, shape = color, color=cut)) + geom_point() + 
    scale_shape_manual(values=1:3, 
         labels=c("CCC", "DDD", "EEE")) 

產地: enter image description here

3

的標籤,請注意您的錯字標貼代替標籤這是造成錯誤。嘗試

scale_shape_discrete(labels = c("DDD", "EEE", "FFF"))