Я хотел бы нарисовать сюжет с одинаковой шириной баров. Вот мой минимальный пример кода:
data <- data.frame(A = letters[1:17],
B = sample(1:500, 17),
C = c(rep(1, 5), rep(2, 6), rep(c(3,4,5), each = 2)))
ggplot(data,
aes(x = C, y = B, label = A,
fill = A)) +
geom_bar(stat = "identity", position = "dodge") +
geom_text(position = position_dodge(width = 0.9), angle = 90)
Результат показан на картинке выше:
Ширина столбцов зависит от количества наблюдений в группе, указанных в переменной C
Я хочу, чтобы каждая полоса имела одинаковую ширину.
facet_grid(~C)
работает (facet_grid(~C)
одинаковой ширины), это не то, что я имею в виду:
ggplot(data,
aes(x = C, y = B, label = A,
fill = A)) +
geom_bar(stat = "identity", position = "dodge") +
geom_text(position = position_dodge(width = 0.9), angle = 90) +
facet_grid(~C)
Я хочу, чтобы график был похож на первый снимок, но с шириной столбцов, не зависящей от количества наблюдений на каждом уровне из столбца C
Как мне это сделать?
[EDIT] geom_bar(width)
изменяет ширину группы баров, но все же бары в пятой группе шире, чем в первой группе, поэтому это не ответ на мой вопрос.