ggplot2の高さに応じた棒の色

Question

棒グラフの棒の色をその高さに応じた縮尺で変更するにはどうすればよいですか？ここでは例です：

library(ggplot2) 
year = c(2000,2000,2001,2001,2001,2002,2003,2003,2004,2004,2004,2004,2005) 
df = data.frame(year) 

ggplot(df) + geom_bar(aes(year,fill=year)) 

私は毎年の数（例えば、低カウントと高いカウントのためのダークブルーとの年のためにライトブルー、）によると、スケールにする色を必要としています。

データフレーム（2000; 2、2001; 3など）としてカウントを使用するとできますが、これはコードの他の部分で多くの作業が必要になるため、この形式のデータ。

Answer 1

ggplot()で計算された..count..を入力変数として使用します。

ggplot(df) + geom_bar(aes(year,fill=..count..))