2013-10-24 177 views
5

我有一個問題,我有重疊的軸標籤,似乎無法得到一個解決方案來解決這個問題。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() 

有沒有辦法讓沒有重疊,以解決這一問題?

回答

10

您可以調整了一下你的x軸或者通過自動縮寫標籤是

p + scale_x_discrete(labels = abbreviate) 

也可以提供縮寫標籤自己在

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

參見:http://docs.ggplot2.org/current/scale_discrete.html

+4

這是一個很好的答案,但另一個個人最喜歡的是在每個xlabel的開頭交替換行符: 'p + scale_x_discrete(labels =功能(標籤){ fixedLabels < - C() 爲(升在1:長度(標籤)) { fixedLabels < - C(fixedLabels, paste0(ifelse(升%% 2 == 0, '' ,'\ n'),標籤[l])) } return(fixedLabels) })' – aaiezza