How to Automatically Highlight Multiple Sections of X-Axis in ggplot2 with Customized Appearance