Обернуть текст легенды в ggplot2

При создании графиков с использованием ggplot2 у меня есть несколько длинных имен легенд, которые я хочу заключить в две строки. Например:

<code>a <- (1:10)
b <- c(1,1.5,2,4,5,5.3,7,9,9.5,9.8)
places = c("Birmingham","Chester-le-street","Cambridge", "Newcastle-upon-Tyne","Peterborough","Cambridge", "Newcastle-upon-Tyne","Peterborough","Liverpool","Stratford-upon-Avon")
df1 = data.frame(a,b,places)
library(ggplot2)
i = ggplot(df1, aes(x=a, y=b)) + geom_point(aes(colour = places), size=3) + opts(legend.position="bottom")
</code>

Как бы я обернул элементы легенды, когда поле установлено внизу - скажем, в 2 или 3 строки? На данный момент семь предметов легенды находятся рядом друг с другом. Я бы предпочел, чтобы они отображались в два ряда (скажем, четыре города в верхнем ряду и три города во втором ряду).

Спасибо заранее.

Ответы на вопрос(2)

Ваш ответ на вопрос