在繪圖區域附近有兩條線的移動刻面標籤

我正在繪製刻面圖並且我在試圖移動刻畫區域附近有兩條線的刻面標籤時遇到問題。考慮小例子：我們下面在繪圖區域附近有兩條線的移動刻面標籤

require(ggplot2) 

labs <- as_labeller(c(`0` = "LABEL 1", 
         `1` = "LABEL 2 HAS TWO LINES\nBECAUSE IT'S TOO LONG")) 

p <- ggplot(mtcars, aes(disp, drat)) +      
    geom_point() + 
    theme_bw() + 
    geom_hline(yintercept=2, linetype="solid") + 
    geom_vline(xintercept=50, linetype="solid") + 
    scale_x_continuous(limits=c(50,500), expand =c(0,0)) + 
    scale_y_continuous(limits = c(2, 5), expand = c(0,0)) + 
    theme(panel.border = element_blank(), 
     strip.background = element_blank(), 
     strip.text = element_text(size=9), 
     panel.grid.major = element_blank(), 
     panel.grid.minor = element_blank()) + 
    facet_wrap(~am, labeller = labs) 
p

現在加入vjust=-0.62移動繪圖區附近的小標籤：

p + theme(strip.text = element_text(size=9, vjust=-0.62))

，你可以只能看到標籤1（單線標籤）靠近繪圖區 - 這就是t他的問題。我希望兩個標籤都可以移動。有沒有人有任何建議？ *觀察：我正在處理大量的多面情節，因此製作和自定義情節一個接一個似乎不是一個好主意。

來源

2016-09-21 R. Joe

所以你需要在LABEL1原產地粘貼（0,0） –

但願這有助於您

p + theme(strip.text = element_text(size=9, vjust=1))

來源

2016-09-21 06:42:05

在繪圖區域附近有兩條線的移動刻面標籤

回答

相關問題