r - ggplot2 で複数の塗りつぶし色を持つ geom_bar

Question

私はこの種のデータセットを持っています:

comb<-data.frame(nom=c("A","B","C","A","B","C"),type=c(rep("1",3),rep("2",3)),val=c(1,3,2,3,2,2))

この結果を次のようにしたいと思いますggplot2:

でもこれしか持ってない

ggplot()+    geom_bar(data=comb,aes(x=nom, y=val,fill=type),stat='identity',position='dodge')

解決策はありますか？

Answer 1

すべてのバーを異なる色にしたい場合は、interactionoftypeとを使用する必要がありますnom:

library(ggplot2)
ggplot() +  
  geom_bar(data = comb,aes(x = nom, y = val, fill = interaction(type, nom)),
           stat = 'identity', position = 'dodge')