ggupset

Example plot

ggupset provides UpSet plot capabilities for ggplot2.

library(ggplot2)
library(tidyverse)
library(ggupset)

tidy_movies %>%
  distinct(title, year, length, .keep_all=TRUE) %>%
  ggplot(aes(x=Genres)) +
    geom_bar() +
    scale_x_upset(n_intersections = 20)

For more information see the ggupset CRAN page and the corresponding Github repository.