У меня есть dataframe d
:
> 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
Что я рисую с помощью:
ggplot(d, aes(groupchange, y=..count../sum(..count..), fill=Symscore3)) +
geom_bar(position = "dodge")
Таким образом, каждый бар представляет свой процент по всем данным.
Вместо этого я хотел бы, чтобы каждый бар представлял относительный процент; т.е. сумма бара, полученного с помощью groupchange = k
, должна быть 1
.