R alluvial chart with NA

data(vaccinations)
levels(vaccinations$response) <- rev(levels(vaccinations$response))
ggplot(vaccinations,
       aes(x = survey, stratum = response, alluvium = subject,
           y = freq,
           fill = response, label = response)) +
  scale_x_discrete(expand = c(.1, .1)) +
  geom_flow() +
  geom_stratum(alpha = .5) +
  geom_text(stat = "stratum", size = 3) +
  theme(legend.position = "none") +
  ggtitle("vaccination survey responses at three points in time")

Source: cran.r-project.org

R alluvial chart with NA

ggplot(as.data.frame(Titanic),
       aes(y = Freq,
           axis1 = Survived, axis2 = Sex, axis3 = Class)) +
  geom_alluvium(aes(fill = Class),
                width = 0, knot.pos = 0, reverse = FALSE) +
  guides(fill = FALSE) +
  geom_stratum(width = 1/8, reverse = FALSE) +
  geom_text(stat = "stratum", aes(label = after_stat(stratum)),
            reverse = FALSE) +
  scale_x_continuous(breaks = 1:3, labels = c("Survived", "Sex", "Class")) +
  coord_flip() +
  ggtitle("Titanic survival by class and sex")

Source: cran.r-project.org

R alluvial chart with NA

data(majors)
majors$curriculum <- as.factor(majors$curriculum)
ggplot(majors,
       aes(x = semester, stratum = curriculum, alluvium = student,
           fill = curriculum, label = curriculum)) +
  scale_fill_brewer(type = "qual", palette = "Set2") +
  geom_flow(stat = "alluvium", lode.guidance = "frontback",
            color = "darkgray") +
  geom_stratum() +
  theme(legend.position = "bottom") +
  ggtitle("student curricula across several semesters")

Source: cran.r-project.org

Similar codes

1 vote201 views1 answer
R extract everything before character
R
8 votes433 views3 answers
How to count the number of non NA values in R
R
0 vote168 views1 answer
R count list
R
0 vote199 views1 answer
Print data type R
R
0 vote176 views1 answer
R first row by group
R
0 vote183 views1 answer
ISO 2 letter country code in r
R
0 vote136 views1 answer
How to loop in r using a character in a string
R
0 vote179 views1 answer
Ggplot increase label font size
R
1 vote192 views1 answer
R range with step
R
0 vote176 views1 answer
Conditional mean statement r
R