addEventLines function

Add vertical lines to an existing xts plot