Ich habe ein Grundproblem mit der Funktion geom_histogram

Mit dem Datensatz:

df <- data.frame(value = factor( rep(c("A","B"), c(100,200) )))

Ich erstelle ein Histogramm mit:

ggplot(df, aes(x=value, fill = factor(value))) + geom_histogram()

und die Ausgabe ist ein Histogramm mit der Zählung 100 für A und 200 für B

Wenn ich stattdessen die Dichte zeichne mit:

ggplot(df, aes(x=value, fill = factor(value), ..density..)) + geom_histogram()

Die Ausgabe ist ein Histogramm mit der Dichte 1 für A und 1 für B. Ich gehe davon aus, dass die Dichte für A und B separat berechnet wird.

Das Histogramm erstellt mit:

ggplot(df, aes(x=value, group = 1, fill = factor(value),..density..)) + geom_histogram()

Ist ein Histogramm, bei dem A 0,33 und B 0,66 ist, die Füllfarbe jedoch schwarz ist, und ich kann keine Möglichkeit finden, die in den vorherigen Histogrammen in dieser Version des Diagramms verwendeten Füllfarben zu ermitteln.

Wie erstelle ich die letzte Version des Histogramms mit Füllfarben basierend auf dem Faktor (Wert)?