r - 1 つの軸で strip.background を削除 (ggplot2)

Question

ggplot2 のテーマ要素の多くには、1 つの軸のみで何かを削除/変更するための .x または .y のみの拡張子があります。 以下に示すように、同等のものstrip.backgroundはありません。strip.background.x

strip.background1 つの軸のみのファセット ラベルからテキストを削除するにはどうすればよいですか?

a <- ggplot(mtcars, aes(mpg, hp)) +
    geom_point() +
    facet_grid(cyl~gear) 

a + theme(strip.text.y = element_blank(), 
    strip.background.x = element_blank())

##     > a + theme(strip.text.y = element_blank(), strip.background.x = element_blank())
##     Error in (function (el, elname)  : 
##       "strip.background.x" is not a valid theme element name.

Answer 1

関連するストリップを削除する方法は次のとおりです。

library(grid)  # for the grid functions
g <- ggplotGrob(a)
keep <- !grepl("strip-right", g$layout$name)
g$grobs <- g$grobs[keep]
g$layout <- g$layout[keep, ]
grid.newpage()
grid.draw(g)

Answer 2

少なくとも ggplot2 バージョン 2.0.0 では。strip.text.x=またはstrip.text.y=を設定するelement_blank()と、特定の軸のテキストと背景が削除されます。

a + theme(strip.text. = element_blank())