Sequence color blocks inside ggplot2 plot area at specific coordinates

I have a simple line plot where I show a DNA sequence on the x-axis, done in the following way with ggplot2: