r - ファセットの strip.text バーの高さを上げる方法はありますか?

Question

上部の灰色のバーを広くしたいのですが、その端を文字の上部と下部から少し離してください (strip.text - A、B、C など)。行の高さがパディングとして機能すると思っていたでしょうが、そうではありません。

ggplot(diamonds, aes(carat, price, fill = ..density..)) +
  xlim(0, 2) + stat_binhex(na.rm = TRUE)+
  facet_wrap(~ color) +
  theme(strip.text = element_text(lineheight=20)) 

Answer 1

まず、改行が含まれるようにレベルを変更します。

levels(diamonds$color) <- paste0(" \n", levels(diamonds$color) , "\n ")

その後、必要に応じて調整します。例えば：

P <- ggplot(diamonds, aes(carat, price, fill = ..density..)) +
      xlim(0, 2) + stat_binhex(na.rm = TRUE)+
      facet_wrap(~ color)

P +  theme(strip.text = element_text(size=9, lineheight=0.5))

P +  theme(strip.text = element_text(size=9, lineheight=3.0))