Добавить оси X и Y ко всем facet_wrap

Часто желательно минимизировать количество чернил на графике. У меня граненый сюжет (facet_wrap) и хотел бы удалить как можно больше чернил, сохраняя при этом удобочитаемость. Я настроил его так, как хотел бы, за исключением того, что оси x и y не представлены для граней (подзаговоров), если они не расположены слева или снизу. После удаления такого большого количества чернил, я полагаю, что глазу нужны эти подсказки, и я спрашиваю, как разместить оси x и y на всех графиках в пределахfacet_wrap, Ниже приведен мой код, токовый выход и требуемый выход (красные линии - желаемое дополнение):

library(ggplot); library(grid)

ggplot(mtcars, aes(mpg, hp)) + 
    geom_point() + 
    facet_wrap(~carb) +
    theme(panel.grid = element_blank(),
        panel.background = element_rect(fill = "white", colour = "black"), 
        panel.border = element_rect(fill = NA, colour = "white"), 
        axis.line = element_line(),
        strip.background = element_blank(),
        panel.margin = unit(2, "lines"))

Текущий участок

Желаемый участок

Ответы на вопрос(5)

Ваш ответ на вопрос