Eu tenho um quadro de dadosd:

> head(d,20)
   groupchange Symscore3
1            4         1
2            4         2
3            4         1
4            4         2
5            5         0
6            5         0
7            5         0
8            4         0
9            2         2
10           5         0
11           5         0
12           5         1
13           5         0
14           4         1
15           5         1
16           1         0
17           4         0
18           1         1
19           5         0
20           4         0

Com quem estou tramando:

ggplot(d, aes(groupchange, y=..count../sum(..count..),  fill=Symscore3)) +
  geom_bar(position = "dodge") 

Dessa forma, cada barra representa sua porcentagem em todos os dados.

Em vez disso, gostaria que cada barra represente uma porcentagem relativa; isto é, a soma da barra obtida comgroupchange = k deveria estar1.