combined_databike_2 %>% group_by(member_casual, month) %>% summarise(number_of_rides = n()) %>% arrange(member_casual, month) %>% ggplot(aes(x = month, y = number_of_rides, fill = member_casual)) +geom_col(position = "dodge") + labs(title= "Numbers of rides completed by month",
subtitle= "June 2020 to May 2021")
As you can see the X labels from June through May are stacked and cannot differentiate of which one-month bar is. I tried adding width = 0.5
but did not clear that space when I pressed the RMarkdown.
Any feedback is appreciated.