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

0 vote382 views1 answer
Conditional mean statement r
R
0 vote374 views1 answer
Imputation in r
R
0 vote290 views1 answer
How to loop in r using a character in a string
R
0 vote374 views1 answer
Convert country code to country name in r
R
0 vote350 views1 answer
Reverse row order dataframe R
R
5 votes581 views2 answers
R load packages
R
0 vote400 views1 answer
Significance codes
R
0 vote412 views1 answer
R - remove scientific notations
R
-1 vote287 views1 answer
How to take the mean of a row in r
R
9 votes532 views3 answers
Replace na with 0 in R
R