Replacing a stacked bar plot with a dot plot in R with ggplot2 (CC352)

Pat uses R to show how to create a dot plot as an alternative to stacked bar plots like the one posted by the Pew Research Center describing people's sense of how different groups will fare under the Trump Administration. To pull this off he uses the ggplot2, showtext, and ggtext packages. The functions he uses from these packages include aes, coord_cartesian, element_blank, element_markdown, element_rect, element_text, factor, font_add_google, geom_hline, geom_point, ggplot, ggsave, labs, library, margin, mutate, pivot_longer, rev, scale_color_manual, showtext_auto, showtext_opts, theme, tribble, and unit. The newsletter describing this visualization at a 30,000 ft view can be found at https://shop.riffomonas.org/posts/my-.... You can find the data he uses and the code he developed in this episode at https://www.riffomonas.org/code_club/.... You can find the original Pew Research Center article at https://www.pewresearch.org/short-rea.... If you have a figure that you would like to see me discuss in a future newsletter and episode of Code Club, email me at pat@riffomonas.org!

Want more practice on the concepts covered in Code Club? You can sign up for my weekly newsletter at https://shop.riffomonas.org/youtube to get practice problems, tips, and insights. If you're interested in purchasing a video workshop be sure to check out https://riffomonas.org/workshops/

Support Riffomonas by becoming a Patreon member!
  / riffomonas  

You can also find complete tutorials for learning R with the tidyverse using...
Microbial ecology data: https://www.riffomonas.org/minimalR/
General data: https://www.riffomonas.org/generalR/

If you want to cite this video, please consider citing https://journals.asm.org/doi/10.1128/...

0:00 Introduction
3:10 Creating dot plot
5:37 Ordering categories with gaps between groups
11:18 Formatting plotting panel with grid lines
14:25 Adjusting the colors
17:30 Formatting and positioning the legend
20:34 Adding and formatting titles and caption
26:51 Finishing touches