title: How to label a barplot on the opposite side of a bar of -ve and +ve values with ggplot?
body: <p>May I please seek your help to Label a barplot with ggplot2 like the following graph:</p>
  
  <p><img src="https://i.stack.imgur.com/3Xv6X.png" alt="enter image description here"></p>
  
  <p>I am using the following code to obtain the attached plot:</p>
  
  <pre><code>library(ggplot2)
  
  test &lt;- data.frame(x = c("Moderately Poor", "Deeply Poor", "Deeply &amp; Intensely Poor", "Intensely Poor", "Overall Poverty"), y = c(0.024, -0.046, -0.025, -0.037, -0.083))
  
  test$colour &lt;- ifelse(test$y &lt; 0, "firebrick1", "steelblue")
  test$hjust &lt;- ifelse(test$y &gt; 0, 1.03, -0.03)
  
  ggplot(test, aes(x, y, label = x, hjust = hjust)) + 
      geom_text(aes(y = 0, colour = colour)) + 
      geom_bar(stat = "identity", aes(fill = colour))
  
  last_plot() + coord_flip() + labs(x = "", y = "") +
      scale_x_discrete(breaks = NA) + theme_bw() +
      opts(legend.position = "none")
  </code></pre>
  
  <p>I was just wondering how can I get the second numeric label on each bar?</p>
  
  <p>Thanks,</p>