Fix figure 2.3 code

[ajohns24]

Code for 2nd bar plot should be ggplot(article_sim, aes(x = usage)) not ggplot(article_sim, aes(x = type)).