title: Filling bars in barplot with textiles in ggplot2
body: <pre><code>test &lt;- data.frame(a=c(1,2,3,4), b=c(4,4,4,4))
  ggplot(test, aes(x=a, y=b, fill=factor(a)))+geom_bar(stat='identity')
  </code></pre>
  
  <p><img src="https://i.stack.imgur.com/TdHzf.png" alt="enter image description here"></p>
  
  <p>but i also want to add texitiles in this plot, something like:<br>
  <img src="https://i.stack.imgur.com/Tf86m.png" alt="enter image description here"></p>
  
  <p>Thank you very much</p>