Gevorderde datavisualisatie met ggplot2
Rick Scavetta
Founder, Scavetta Academy
# Plot
p <- ggplot(msleep2, aes(bodywt_log,
brainwt_log)) +
geom_point(alpha = 0.6, shape = 16) +
coord_fixed()
p

p +
facet_grid(rows = vars(vore))

p +
facet_grid(rows = vars(vore))

p +
facet_grid(rows = vars(vore))
Twee veelvoorkomende facetproblemen:

p +
facet_grid(rows = vars(vore))
Oplossingen:

# Standaard wordt de waarde gelabeld
p +
facet_grid(rows = vars(vore),
labeller = label_value)

# Ook de variabelenaam tonen
p +
facet_grid(rows = vars(vore),
labeller = label_both)

p +
facet_grid(rows = vars(vore,
conservation))

p +
facet_grid(rows = vars(vore,
conservation),
labeller = label_context)

p +
facet_grid(rows = vars(vore),
cols = vars(conservation),
labeller = label_context)

p +
facet_grid(rows = vars(vore),
cols = vars(conservation))


msleep2$conservation <- fct_recode(msleep2$conservation,
Domesticated = "domesticated",
`Least concern` = "lc",
`Near threatened` = "nt",
Vulnerable = "vu",
Endangered = "en")
msleep2$vore = fct_recode(msleep2$vore,
Carnivore = "carni",
Herbivore = "herbi",
Insectivore = "insecti",
Omnivore = "omni")
# Plot
p <- ggplot(msleep2, aes(bodywt_log,
brainwt_log)) +
geom_point(alpha = 0.6, shape = 16) +
coord_fixed()
p +
facet_grid(rows = vars(vore),
cols = vars(conservation))


# Volgorde van levels aanpassen:
msleep2$conservation = fct_relevel(msleep2$conservation,
c("Domesticated",
"Least concern",
"Near threatened",
"Vulnerable",
"Endangered"))

Gevorderde datavisualisatie met ggplot2