在ggplot2中通過符號設置特定的填充顏色

您好想要調整下面的圖表，使得零以下的值填充爲紅色，而上面的填充顏色爲深藍色。我怎樣才能做到這一點與ggplot2？在ggplot2中通過符號設置特定的填充顏色

mydata = structure(list(Mealtime = "Breakfast", Food = "Rashers", `2002` = 9.12, 
          `2003` = 9.5, `2004` = 2.04, `2005` = -20.72, `2006` = 18.37, 
          `2007` = 91.19, `2008` = 94.83, `2009` = 191.96, `2010` = -125.3, 
          `2011` = -18.56, `2012` = 63.85), .Names = c("Mealtime", "Food", "2002", "2003", "2004", "2005", "2006", "2007", "2008","2009", "2010", "2011", "2012"), row.names = 1L, class = "data.frame") 
x=ggplot(mydata) + 
    aes(x=colnames(mydata)[3:13],y=as.numeric(mydata[1,3:13]),fill=sign(as.numeric(mydata[1,3:13]))) + 
    geom_bar(stat='identity') + guides(fill=F) 
print(x)

來源

2012-10-16 Tahnoon Pasha

你組織你的數據的方式是不應該的在ggplot2：

require(reshape) 
mydata2 = melt(mydata)

基本barplot：

ggplot(mydata2, aes(x = variable, y = value)) + geom_bar()

enter image description here

的訣竅，現在是增加一個額外的變量，指定該值是否定的或p ostive：

mydata2[["sign"]] = ifelse(mydata2[["value"]] >= 0, "positive", "negative")

..和使用在調用ggplot2（與scale_fill_*爲顏色的組合）：

ggplot(mydata2, aes(x = variable, y = value, fill = sign)) + geom_bar() + 
    scale_fill_manual(values = c("positive" = "darkblue", "negative" = "red"))

enter image description here

來源

2012-10-16 08:50:53

輝煌。謝謝。 scale_fill_manual是我正在尋找的。我對你的觀點是關於熔化和重鑄數據。我對dput（）很懶惰。這仍然適用於我更笨拙的代碼：+ scale_fill_manual（values = c（「1」=「dark blue」，「 - 1」=「red」））'，但是對於可訪問性分析的要求更低。 –

你通常不使用矢量作爲美學。美學是將變量（data.frame中的列）映射到圖中的座標軸。 –

在ggplot2中通過符號設置特定的填充顏色

回答

相關問題