R geom_density over geom_histogram with facet_grid not displayed

Question

I have a histogram and want to display a density plot line or area over it. It does not work with the following code.

The histogram is displayed the way i want but th