title: Show the table of values under the bar plot
body: <p>I ask this without find something to try, because I didn't find something same. I apologize for this.</p>
  
  <p>From <a href="https://stackoverflow.com/a/44356062/8088458">this</a> bar plot:</p>
  
  <pre><code>df &lt;- structure(list(year = 2002:2005, work = c(1L, 2L, 3L, 2L), confid = c(8L, 
  5L, 0L, 6L), jrs = c(0L, 3L, 4L, 5L)), .Names = c("year", "work", 
  "confid", "jrs"), class = "data.frame", row.names = c(NA, -4L
  ))
  
  library(ggplot2)
  library(reshape)
  md &lt;- melt(df, id=(c("year")))
  temp.plot &lt;- ggplot(data=md, aes(x=year, y=value, fill=variable) ) + 
      geom_bar(stat="identity")+ 
      theme(axis.text.x=element_text(angle=90))+ 
      ggtitle("Score Distribtion")
  
  temp.plot
  </code></pre>
  
  <p>I would like to ask if is there any simple way using ggplot2 to have the value under every year as it is in barplot for every variable.
  Here a dummy example output:
  <a href="https://i.stack.imgur.com/P1lx1.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/P1lx1.png" alt="enter image description here"></a></p>