ggplot2 latex trick

This is a useful package to use latex notation in {ggplot2}. I saw this on twitter and wish I had written down the originator for proper citation but I forgot at the time.

library(tidyverse)
library(latex2exp)

example_data <-tibble(ability = seq(-3,3, .1)) %>% 
  mutate(result = plogis(ability*2))

example_data %>% 
  ggplot(aes(ability, result))+
  geom_line()+
  labs(
    x = TeX("<span class="katex"><span class="katex-mathml"><math xmlns="http://www.w3.org/1998/Math/MathML"><semantics><mrow><mi>a</mi><mi>b</mi><mi>i</mi><mi>l</mi><mi>i</mi><mi>t</mi><mi>y</mi><mo stretchy="false">(</mo><mspace linebreak="newline"></mspace><mi>t</mi><mi>h</mi><mi>e</mi><mi>t</mi><mi>a</mi><mo stretchy="false">)</mo></mrow><annotation encoding="application/x-tex">ability(\\theta)</annotation></semantics></math></span><span class="katex-html" aria-hidden="true"><span class="base"><span class="strut" style="height:1em;vertical-align:-0.25em;"></span><span class="mord mathnormal">abi</span><span class="mord mathnormal" style="margin-right:0.01968em;">l</span><span class="mord mathnormal">i</span><span class="mord mathnormal">t</span><span class="mord mathnormal" style="margin-right:0.03588em;">y</span><span class="mopen">(</span></span><span class="mspace newline"></span><span class="base"><span class="strut" style="height:1em;vertical-align:-0.25em;"></span><span class="mord mathnormal">t</span><span class="mord mathnormal">h</span><span class="mord mathnormal">e</span><span class="mord mathnormal">t</span><span class="mord mathnormal">a</span><span class="mclose">)</span></span></span></span>")
  )+
  theme_bw()

plogis(3)

[1] 0.9525741

exp(3)/(1+exp(3))

[1] 0.9525741

@online{dewitt2019,
  author = {Michael E. DeWitt},
  title = {Latex in ggplot2},
  date = {2019-04-03},
  url = {https://michaeldewittjr.com/blog/2019-04-03-latex-in-ggplot2/},
  langid = {en}
}
Copy