2013-10-24 20 views
5

Ich habe ein Problem, bei dem überlappende Achsenbeschriftungen auftreten und ich keine Lösung finden kann, um dies zu beheben.Überlappende Achsenbeschriftungen in R

enter image description here

p <- ggplot(data=Data,aes(x=Indicator,y=Numeric,group=Expenditure_group,shape=Expenditure_group,colour=Expenditure_group))+geom_point()+geom_line() 

Gibt es eine Möglichkeit, dies zu beheben, so dass es keine Überschneidungen gibt?

Antwort

10

einzustellen, können Sie ein wenig Ihre x-Achse entweder automatisch Etiketten wie in

p + scale_x_discrete(labels = abbreviate) 

Abkürzen oder Sie können Etiketten abgekürzt Verschaffen Sie sich wie in

p + scale_x_discrete(labels = c("Congenital Rubella" = "C. Rub.", ..., "Total tetanus" = "T. tet.", "Yellow fever" = "Y. fever") 

See: http://docs.ggplot2.org/current/scale_discrete.html

+4

Dies ist eine gute Antwort, aber ein anderer persönlicher Favorit ist es, einen Newline - Charakter am Anfang jedes xlabel zu wechseln: 'p + scale_x_discrete (labels = Funktion (Etiketten) { fixedLabels <- c() für (l in 1: Länge (Etiketten)) { fixedLabels <- c (fixedLabels, paste0 (ifelse (l %% 2 == 0, '' , '\ n'), Etiketten [l])) } Rückgabe (festeLabels) }) ' – aaiezza