Anone know how to change the position of the legend title in ggplot?

I have used the following code to move the legend to the bottom and make it horizontal

p <- p + opts(legend.position = 'bottom', legend.direction = 'horizontal')

But now I want the title to be to the left of the legend instead of above. I've looked in the follwing places but cant find it or figure it out:

https://github.com/hadley/ggplot2/wiki/Legend-Attributes http://had.co.nz/ggplot2/book/toolbox.r

Any assistance would be greatly appreciated

r position ggplot2 legend
Edit
Report