title: Adding Percentages to a Grouped Barchart Columns in GGplot2
body: <p>Hoping someone can help me with labelling columns of a grouped barchart with percentages. I couldn't find an existing post that I could make work successfuly. Below is the code for a basic example dataframe. </p>
  
  <pre><code>Service&lt;-c("AS","AS","PS","PS","RS","RS","ES","ES")
  
  Year&lt;-c("2015","2016","2015","2016","2015","2016","2015","2016")
  
  Q1&lt;-c("Dissatisfied","Satisfied","Satisfied","Satisfied","Dissatisfied","Dissatisfied","Satisfied","Satisfied")
  
  Q2&lt;-c("Dissatisfied","Dissatisfied","Satisfied","Dissatisfied","Dissatisfied","Satisfied","Satisfied","Satisfied")
  
  Example&lt;-data.frame(Service,Year,Q1,Q2)
  </code></pre>
  
  <p>Next, I melted it with Reshape2 so that I could plot the Q1 and Q2 column variables along the x-axis. I then created a basic grouped barchart with ggplot2, with counts on the y-axis, and then a facet by year. </p>
  
  <pre><code>ExampleM&lt;-melt(Example,id.vars=c("Service","Year"))
  
  ggplot(ExampleM,aes(x=variable,stat="identity",fill=value)) + 
    geom_bar(position="dodge") + facet_grid(~Year)
  </code></pre>
  
  <p>What I'm struggling with is how to add column labels. Specifically I would like to know how to add basic frequency counts, as well as percentages. Not both together, but one or the other. I can't make either work. I've tried using "+geom_text(aes(labels=" but I'm not sure what to put as the label since I used stat="identity" in the ggplot code. </p>
  
  <p>Also, for percentages, do I need to calculate it with dplyr first, or can I calculate the percentages within the ggplot code? I also don't know enough about labels in R, so not sure about how to add the actual % sign. </p>
  
  <p>Hoping someone can show me a basic way to achieve all this! </p>