Como usar facet_wrap em r (com exemplos)

A função facet_wrap() pode ser usada para produzir gráficos de vários painéis no ggplot2.

Esta função usa a seguinte sintaxe básica:

 library (ggplot2)

ggplot(df, aes (x_var, y_var)) +
  geom_point() +
  facet_wrap(vars(category_var))

Os exemplos a seguir mostram como usar esta função com o conjunto de dados mpg integrado em R:

 #view first six rows of mpg dataset
head(mpg)

manufacturer model displ year cyl trans drv cty hwy fl class
										
audi a4 1.8 1999 4 auto(l5) f 18 29 p compact
audi a4 1.8 1999 4 manual(m5) f 21 29 p compact
audi a4 2.0 2008 4 manual(m6) f 20 31 p compact
audi a4 2.0 2008 4 auto(front) f 21 30 p compact
audi a4 2.8 1999 6 auto(l5) f 16 26 p compact
audi a4 2.8 1999 6 manual(m5) f 18 26 p compact

Exemplo 1: função básica facet_wrap()

O código a seguir mostra como criar vários gráficos de dispersão em ggplot2 usando displ como variável do eixo x, hwy como variável do eixo y e class como variável de agrupamento:

 ggplot(mpg, aes (displ, hwy)) +
  geom_point() +
  facet_wrap(vars(class))

Exemplo 2: Use rótulos personalizados

O código a seguir mostra como usar a função facet_wrap() com rótulos personalizados para títulos de gráficos:

 #define custom labels
plot_names <- c('2seater' = "2 Seater",
                'compact' = "Compact Vehicle",
                'midsize' = "Midsize Vehicle",
                'minivan' = "Minivan",
                'pickup' = "Pickup Truck",
                'subcompact' = "Subcompact Vehicle",
                'suv' = "Sport Utility Vehicle")

#use facet_wrap with custom plot labels
ggplot(mpg, aes (displ, hwy)) +
  geom_point() +
  facet_wrap(vars(class), labeller = as_labeller (plot_names)) 

Exemplo 3: Use escalas personalizadas

O código a seguir mostra como usar a função facet_wrap() com escalas personalizadas para cada gráfico individual:

 #use facet_wrap with custom scales
ggplot(mpg, aes (displ, hwy)) +
  geom_point() +
  facet_wrap(vars(class), scales=' free ') 

Exemplo 4: Use um comando personalizado

O código a seguir mostra como usar a função facet_wrap() com ordenação personalizada para gráficos individuais:

 #define order for plots
mpg <- within(mpg, class <- factor(class, levels=c(' compact ', ' 2seater ', ' suv ',
                                                   ' subcompact ', ' pickup ',
                                                   ' minivan ', ' midsize ')))

#use facet_wrap with custom order
ggplot(mpg, aes (displ, hwy)) +
  geom_point() +
  facet_wrap(vars(class)) 

Observe que os gráficos aparecem na ordem exata que especificamos.

Recursos adicionais

Como alterar o tamanho da fonte no ggplot2
Como remover uma legenda no ggplot2
Como girar rótulos de eixo no ggplot2