Added functionality please

[erex]

Jason:

I'm trying to use timeline() to organise staff allocated to projects. I wanted to provide a title on the plots to indicate what is being depicted. I can do this with

plotname <- timeline() plotname + ggtitle()

However the addition of the title seems to have broken the events ability of the function to show events either above or below the plot.

Am I asking too much to have both a title and events?