Принудительно включить текст по оси X для всех граней графика facet_grid
У меня такая же проблема какэтот пользователь: Я хотел бы сделатьfacet_grid
построить график с дискретной осью X, и я бы хотел, чтобы метки оси X были написаны под каждым фасетом, а не только под нижним рядом граней. Например:
# Drop some factor levels to make the plot smaller
diamondSub <- subset(diamonds, (cut=="Ideal" | cut=="Premium") &
(color=="E" | color=="I"))
# Note that scales="free_x" has no practical effect here
ggplot(diamondSub, aes(x=clarity, y=price)) +
geom_blank()+
geom_boxplot() +
facet_grid(cut~color, scales="free_x")
Тем не менее, я бы предпочел не использовать решение из этого поста, который был просто использоватьfacet_wrap
вместоfacet_grid
потому что я предпочитаю способfacet_grid
помечает текст полосы одной переменной в верхней части столбцов, а другой переменной - по сторонам строк.
Есть ли способ получить метки оси X под каждым фасетом, когда все оси X на самом деле одинаковы, используяfacet_grid
?