#+BEGIN_SRC R :session *R* :noweb yes :results file graphics :file hommes-importance-avis-parents.png :output-dir img/ :exports both
<<recodages>>
ggplot(data = homme) +
geom_bar(aes(x = importance_avis_parents))
ggsave("img/hommes-importance-avis-parents.png", width = 3, height = 3)
#+END_SRC