Estou tentando produzir um gráfico de barras com larguras de barra determinadas por uma variável inteira (tamanho da amostra). Adicionar "width = variableName" não parece funcionar. Existe uma maneira estabelecida de fazer isso? Aqui estão alguns dados e códigos fictícios. Eu quero que as larguras de barra sejam uma função da variável d neste exempl

dat <- data.frame(a=c("A", "B", "C"), b=c(0.71, 0.94, 0.85), d=c(32, 99, 18))

ggplot(dat, aes(x=a, y=b, fill=a)) +  
geom_bar(colour="black", size=.3) + 
theme_bw()