Ich hätte gerne Bars in Dodge bestelltgeom_bar. Wissen Sie, wie Sie damit umgehen sollen?

Mein Code:

ttt <- data.frame(typ=rep(c("main", "boks", "cuk"), 2),
                  klaster=rep(c("1", "2"), 3),
                  ile=c(5, 4, 6, 1, 8, 7))

ggplot()+
    geom_bar(data=ttt, aes(x=klaster, y=ile, fill=typ),
             stat="identity", color="black", position="dodge")

Und Beispieldiagramme, um das Problem besser zu verstehen:

Was ich habe

Was ich gerne hätte: