Представление двух компонентов переменной с помощью гистограммы в ggplot

Question

У меня есть данные о сотрудниках, которые упорядочены следующим образом:

  year status   exp  
   <dbl> <chr>  <dbl> 
 1  2011 0      8.40   
 2  2011 1      6.66   
 3  2012 0      7.49   
 4  2012 1      5.78   
 5  2013 0      6.48   
 6  2013 1      4.51   

Для каждого года статус может быть 0 или 1; 0 - это средний опыт людей, которые бросили курить, а 1 - средний опыт людей, которые остаются. Я хотел бы представить эти данные в виде гистограммы, с указанием года на оси X и опыта на оси Y, с горизонтальной полосой. основа статуса.

Однако

Answer 1

Использование ggplot:

library(ggplot2)

ggplot(df, aes(x = as.factor(year), y = exp, fill = as.factor(status))) +
  geom_col() +
  labs(y = "experience", x = "Year", fill = "Status")

введите описание изображения здесь

Данные

df <- structure(list(year = c(2011L, 2011L, 2012L, 2012L, 2013L, 2013L
), status = c(0L, 1L, 0L, 1L, 0L, 1L), exp = c(8.4, 6.66, 7.49, 
5.78, 6.48, 4.51)), class = "data.frame", row.names = c("1", 
"2", "3", "4", "5", "6"))