Возможно, вы захотите использовать аргумент labeller . Для вашего примера сработают ручные значения, но, вероятно, назначение функций масштабируется лучше для вашего реального варианта использования.
Вот пример обоих:
library(ggplot2)
df <- data.frame(x= 1:100, y= 1:100,
sport= rep(c(TRUE, FALSE), each= 50),
female= rep(c(TRUE, FALSE)))
p1 <- ggplot(df, aes(x, y)) +
geom_point()
# Using manual values
p1 +
facet_grid(
female ~ sport,
labeller = labeller(
female = c("TRUE" = "A", "FALSE" = "B"),
sport = c("TRUE" = "C", "FALSE" = "D")
)
)
# Using functions
your_labeller <- labeller(
female = stringr::str_to_lower,
sport = stringr::str_to_title
)
p1 +
facet_grid(
female ~ sport,
labeller = your_labeller
)
Создано в 2020-03-24 с помощью пакета Представить (v0.2.1)