plot the frequency with multiple groups

williaml · October 9, 2021, 4:45am

Something like this?

library(tidyverse)

df <- tibble(group = sample(c("bananas", "apples", "pears"), 15, replace = TRUE),
             season = sample(c("season 1", "season 2", "season 3"), 15, replace = TRUE))

df2 <- df %>% 
  group_by(group) %>% 
  count(season) %>% 
  mutate(prop = n / sum(n))

ggplot(df2, aes(group, prop, fill = season)) +
  geom_col()

![image|482x401](upload://vhT4lCJtJjEKWWlKqfZMzofgcut.png)

Next time make your dataset reproducible:

FAQ: What's a reproducible example (`reprex`) and how do I create one? meta

Why reprex? Getting unstuck is hard. Your first step here is usually to create a reprex, or reproducible example. The goal of a reprex is to package your code, and information about your problem so that others can run it and feel your pain. Then, hopefully, folks can more easily provide a solution. What's in a Reproducible Example? Parts of a reproducible example: background information - Describe what you are trying to do. What have you already done? complete set up - include any library() calls and data to reproduce your issue. data for a reprex: Here's a discussion on setting up data for a reprex make it run - include the minimal code required to reproduce your error on the data…