Thank you Gal so much. I tried it and it worked. You are right, it was busy because of the number of groups(medications). I really appreciate it.


From: UF R Users List <[log in to unmask]> on behalf of "Ben-Chanoch,Gal" <[log in to unmask]>
Reply-To: UF R Users List <[log in to unmask]>
Date: Thursday, October 4, 2018 at 11:11 AM
To: "[log in to unmask]" <[log in to unmask]>
Subject: Re: Suggestion on visualization trends


yearly_overall_shands<-yearly %>%

  group_by(YEAR,MEDICATION) %>%

  summarise(Total = sum(UNIQUE_PT_COUNT)) %>%


trend_overall_shands<-ggplot(data = yearly_overall_shands, aes(x = factor(MEDICATION), fill = factor(YEAR), y = Total)) +       

  geom_bar(position="dodge",stat="identity") + 



This list strives to be beginner friendly. However, we still ask that you PLEASE do read the posting guide and provide commented, minimal, self-contained, reproducible code.