ggplot2: Добавить имя переменной используется для facet_grid

Question

require(ggplot2) 
ggplot(mtcars, aes(mpg, wt)) + geom_point() + facet_grid(vs+gear ~ cyl+am) 

Я хотел бы добавить имя из 4-х переменных, используемых для facet_grid на этом графике. Я полагаю, что лучший способ сделать это - добавить имя переменных в углах с помощью маленькой стрелки, указывающей на строку или столбец. Я думал использовать annotation_custom и textGrob для этой цели, но ничего не получил на графике.

Answer 1

Что-то вроде этого?

ggplot(mtcars, aes(mpg, wt)) + geom_point() + facet_grid(vs+gear ~ cyl+am,labeller = labeller(.rows = label_both, .cols = label_both)) 

Вы также можете использовать синтаксис как так:

labeller = label_bquote("Gear"==.(gear))