ggplot2中geom_bar上的邊框顏色錯誤

Question

我正在通過抽樣周繪制各種長度類別的魚類數量的條形圖。
這里有一個名為Chin的數據庫：

Trib    Week   Size2  
MM      21     90
SM      21     80
SM      22     100
NM      22     8p

我已將Size2轉換為一個名為Fork的因子，將周轉換為一個名為period的因子。

這是我的代碼：

period<-as.factor(Chin$week)
Chin1<-cbind(Chin, period)
Fork<-as.factor(Chin$Size2)

g <- ggplot(Chin1, aes(period))
g + geom_bar(aes(fill=Fork))+ theme(axis.text.x = element_text(angle=65, 
 vjust=0.6)) +  theme_bw() +scale_fill_manual(values=c("white","gray90", 
"gray82", "gray61", "gray48", "black"))

這很好用，除了條形圖或圖例元素周圍沒有邊框：

但是當我在此行中添加colour="black"以獲得黑色邊框時：

g + geom_bar(aes(fill=Fork, colour="black"))+ theme(axis.text.x 
element_text(angle=65, vjust=0.6))....

我改為使用一個名為"black"的項目獲得帶有新圖例的紅色邊框。無論我選擇何種顏色，我都會得到這個。 圖例項目的名稱會更改（即藍色，綠色），但邊框顏色保持紅色，圖例項目填充仍為黑色。 見下文。 我知道這一定是一個簡單的愚蠢錯誤，但我無法弄清楚。 有任何想法嗎？ 提前致謝！

Answer 1

在aes（）語句之外移動colour="black" 。 aes（）使用數據中的變量來創建美學，所以你要說的是從“黑色”列中獲取顏色，而不存在。

也在這里找到