Testo della legenda di avvolgimento in ggplot2

Question

Mentre produco grafici utilizzando ggplot2, ho alcuni nomi di legenda lunghi che desidero racchiudere su due righe. Per esempio:

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") 

Come potrei fare per avvolgere gli elementi della legenda quando la casella è impostato per essere in fondo - dice in 2 o 3 linee? Al momento i sette elementi della leggenda sono uno accanto all'altro. Preferirei che venissero visualizzati su due file (ad esempio quattro città nella fila superiore e tre città nella seconda fila).

Molte grazie in anticipo.

Answer 1

Ok, date le modifiche , probabilmente lo volevi:

library(scales) 
i + guides(colour = guide_legend(nrow = 2)) 

Ma potresti trovare che vuoi comunque impiegare anche la tecnica del wrapping del testo, per adattarla.

Answer 2

Dal tuo esempio:

df1$places<-sub("-", "- \n ", df1$places) 

i = ggplot(df1, aes(x=a, y=b)) + geom_point(aes(colour = places), size=3) 

Note: - È possibile utilizzare gsub per sostituire tutti i "-" con "- \ n"