Как я могу создать гистограмму с 4 группами в R?

Question

Можете ли вы помочь мне, как создать гистограмму с 4 группами, как на картинке?

Answer 1

Данные не предоставлены, поэтому я создал фиктивные данные.Я создал пример использования ниже, в противном случае есть решения для получения SO, такие как Простейший способ сделать групповой барплот .

library(tidyverse)

# Data
trees <- data.frame(age = sample(c("Old", "Adult", "Young"), 
                                 size = 20, replace = TRUE, prob = c(.5, .25, .25)), 
                    tree = factor(sample(1:5, size = 20, replace = TRUE)), 
                    circumference = rnorm(n = 20, mean = 60, sd = 15))

trees %>% 
  ggplot(aes(x = age, y = circumference, fill = tree)) + 
  geom_col(position = "dodge") + 
  coord_flip()