region <- States[,'region']

pop <- States[,'pop']

df <- data.frame(region,pop)

ggplot(df,aes(x=region,y=pop))+

geom_bar(stat='identity',

         width=0.7,

         fill=rainbow(9))


여기서 막대그래프 색상(fill)을 무지개(rainbow)로 넣고싶은데 안됩니다..

구글링해서 찾은 scale_fill_manual(values = rainbow(9)) 을 사용해도 반응이 전혀 없어요...
살려주시라요...ㅜㅜ