Rimuovi la striscia di sfondo mantiene il bordo del pannello

Question

Ho il seguente tipo di grafico e desidero mantenere ciascun testo di striscia sopra la casella di sfaccettatura individuale come un "titolo" di ordinamento senza avere lo sfondo grigio predefinito e il bordo nero attorno allo strip.background. Lo tengo bianco, che è vicino a quello che voglio, ma vorrei che il bordo inferiore dello strip.background o del bordo superiore dello panel.border fosse nero.

library(ggplot2) 

ggplot(mtcars, aes(mpg, hp)) + geom_point() + 
    facet_wrap(~carb, ncol = 3) + theme_bw() + 
    theme(panel.grid.major = element_blank(), 
     panel.grid.minor = element_blank(), 
     strip.background = element_rect(colour="white", fill="white"), 
     panel.border = element_rect(colour = "black")) 

Answer 1

Se si imposta element_blank() per strip.background e mantenere element_rect(colour="black") per panel.border bordo quindi superiore del panel.border sarà nero.

ggplot(mtcars, aes(mpg, hp)) + geom_point() + 
    facet_wrap(~carb, ncol = 3) + theme_bw() + 
    theme(panel.grid.major = element_blank(), 
     panel.grid.minor = element_blank(), 
     strip.background = element_blank(), 
     panel.border = element_rect(colour = "black")) 

Answer 2

Impostazione panel.border potrebbe coprire il grafico a meno che non si aggiunge anche fill=NA-panel.border:

theme(panel.border = element_rect(fill = NA, colour = "black")) 

Si può anche utilizzare:

theme(panel.background = element_rect(fill = NA, color = "black") 

source (riquadro della sezione " L attributi ")

Answer 3

Si può provare:

strip.background = element_rect(colour=NA, fill=NA), 
panel.border = element_rect(fill = NA, color = "black"))