Create plot_biblemindedness.R