diff --git a/r/_pkgdown.yml b/r/_pkgdown.yml
index 045eeef5..df5e33b4 100644
--- a/r/_pkgdown.yml
+++ b/r/_pkgdown.yml
@@ -8,6 +8,13 @@ repo:
 template:
   bootstrap: 5
   bootswatch: cosmo
+  # This is needed until https://github.com/r-lib/pkgdown/issues/2704 is fixed.
+  includes:
+    in_header: |
+      <link rel="stylesheet" href="https://cdn.jsdelivr.net/npm/katex@0.16.11/dist/katex.min.css" integrity="sha384-nB0miv6/jRmo5UMMR1wu3Gz6NLsoTkbqJghGIsx//Rlm+ZU03BU6SQNC66uf4l5+" crossorigin="anonymous">
+      <script defer src="https://cdn.jsdelivr.net/npm/katex@0.16.11/dist/katex.min.js" integrity="sha384-7zkQWkzuo3B5mTepMUcHkMB5jZaolc2xDwL6VFqjFALcbeS9Ggm/Yr2r3Dy4lfFg" crossorigin="anonymous"></script>
+      <script defer src="https://cdn.jsdelivr.net/npm/katex@0.16.11/dist/contrib/auto-render.min.js" integrity="sha384-43gviWU0YVjaDtb/GhzOouOXtZMP/7XUzwPTstBeZFe/+rCMvRwr4yROQP43s0Xk" crossorigin="anonymous" onload="renderMathInElement(document.body);"></script>
+
 
 development:
   mode: unreleased
diff --git a/r/vignettes/articles/eaf.Rmd b/r/vignettes/articles/eaf.Rmd
index b6e6ed42..a5b088af 100644
--- a/r/vignettes/articles/eaf.Rmd
+++ b/r/vignettes/articles/eaf.Rmd
@@ -50,10 +50,12 @@ for (r in runs) {
   aucs <- c(aucs, auc)
 }
 
-x <- melt(data.frame(r = runs, aoc = aocs, auc=aucs), id.vars="r")
+x <- melt(data.frame(r = runs, AOC = aocs, AUC=aucs), id.vars="r")
 ```
 
 ```{r}
-#| fig.alt = "Plot of EAF AUC versus mean AOC for various numbers of sets."
-ggplot(x, aes(r, value, color=variable, linetype=variable)) + geom_line()
+#| fig.alt = "Plot of EAF AUC versus mean AOC with increasing number of sets."
+ggplot(x, aes(r, value, color=variable, linetype=variable)) +
+  geom_line(linewidth=1.5) +
+  labs(x = "Number of sets", y = "Value", color = "", linetype="")
 ```