Espacios de trazado por facetas

Visualización de datos intermedia con ggplot2

Rick Scavetta

Founder, Scavetta Academy

Facetas y espacios de trazado variables

Motivos para no usar espacios de trazado uniformes:

Tipo de variable	Los subconjuntos contienen
Continua	Rangos muy distintos
Categórica	Grupos diferentes

Ajustar el espacio de trazado...

ggplot(msleep2, aes(bodywt_log,
                    brainwt_log)) +
  geom_point(alpha = 0.6, shape = 16) +
  coord_fixed() +
  facet_grid(rows = vars(vore), 
             cols = vars(conservation))

... pero no con escalas fijas

ggplot(msleep2, aes(bodywt_log,
                         brainwt_log)) +
  geom_point(alpha = 0.6, shape = 16) +
  coord_fixed() +
  facet_grid(rows = vars(vore), 
             cols = vars(conservation),
             scales = "free_x")

Error: coord_fixed doesn't support free scales

Ajustar el espacio de trazado

ggplot(msleep2, aes(bodywt_log, 
                    brainwt_log)) +
  geom_point(alpha = 0.6, shape = 16) +
  facet_grid(rows = vars(vore), 
             cols = vars(conservation),
             scales = "free_x")

Ajustar el espacio de trazado

ggplot(msleep2, aes(bodywt_log, 
                    brainwt_log)) +
  geom_point(alpha = 0.6, shape = 16) +
  facet_grid(rows = vars(vore), 
             cols = vars(conservation),
             scales = "free_y")

Ajustar el espacio de trazado

ggplot(msleep2, aes(bodywt_log, 
                    brainwt_log)) +
  geom_point(alpha = 0.6, shape = 16) +
  facet_grid(rows = vars(vore), 
             cols = vars(conservation),
             scales = "free")

Ajustar el espacio de trazado

ggplot(msleep2, aes(x = bodywt_log, 
                    y = name)) +
  geom_point() +
  facet_grid(rows = vars(vore))

Ajustar el espacio de trazado

ggplot(msleep2, aes(x = bodywt_log, 
                    y = name)) +
  geom_point() +
  # Free the y scales and space
  facet_grid(rows = vars(vore), 
             scales = "free_y")

Ajustar el espacio de trazado

ggplot(msleep2, aes(x = bodywt_log, 
                    y = name)) +
  geom_point() +
  # Free the y scales and space
  facet_grid(rows = vars(vore),
             scales = "free_y", 
             space = "free_y")

Ajustes finales

msleep2 <- msleep2 %>% 
  # Arrange from lo to hi weight
  arrange(-bodywt_log) %>% 
  # Redefine factor levels in order
  mutate(name = as_factor(name)) 

# New order is reflected in y axis
ggplot(msleep2, aes(x = bodywt_log,
                    y = name)) +
  geom_point() +
  # Free the y scales and space
  facet_grid(rows = vars(vore),
             scales = "free_y", 
             space = "free_y")

¡Vamos a practicar!

Visualización de datos intermedia con ggplot2