Início / coding / Perguntas / 78431533
Accepted
Emman
Asked: 2024-05-05 16:35:47 +0800 CST

Como passar uma função anônima para o argumento do rotulador em facet_wrap() do ggplot para adicionar texto aos rótulos existentes?

  • 772

Como posso colar um texto constante adicional nos rótulos de facetas do ggplot?

Por exemplo, tenho este gráfico atual:

library(ggplot2)

df <- data.frame(
  x = rnorm(120, c(0, 2, 4)),
  y = rnorm(120, c(1, 2, 1)),
  z = letters[1:3]
)

ggplot(df, aes(x, y)) + 
  geom_point() + 
  facet_wrap(~z)

Criado em 05/05/2024 com reprex v2.0.2

Agora, digamos que eu queira adicionar a mesma Foo = string de prefixo ( ) a todos os rótulos de facetas:

foo

Se eu fizer

ggplot(df, aes(x, y)) + 
  geom_point() + 
  facet_wrap(~z, labeller = \(x) paste("foo = ", x))

Eu recebo:

bar

Como posso ajustar a função que passo para labellermostrar foo = [preexisting label]?

1 respostas

  1. Best Answer

    Você tem que envolver sua função labeller()assim:

    library(ggplot2)

set.seed(123)

df <- data.frame(
  x = rnorm(120, c(0, 2, 4)),
  y = rnorm(120, c(1, 2, 1)),
  z = letters[1:3]
)

ggplot(df, aes(x, y)) +
  geom_point() +
  facet_wrap(~z,
    labeller = labeller(z = \(x) paste("foo = ", x))
  )

    • 1

relate perguntas