比較組間的頻率並刪除圖例標題
g + geom_bar(aes(x = cut, fill = color), position = "fill") +
guides(fill = guide_legend(title = NULL))
https://i.stack.imgur.com/XZVxl.jpg
g + geom_bar(aes(x = cut, fill = color), position = "fill") +
guides(fill = guide_legend(title = NULL))
https://i.stack.imgur.com/XZVxl.jpg