Mastering Geom_Vline with Scale_X_Discrete: A Guide to Effective Visualization in R