The syntax that I am using is this:
ggplot(df, aes(years.employed, ..count..)) + geom_bar(aes(fill = credit.rating), position = "dodge") + geom_t