R for Authoring!!

---
title: "Emojis and Icons"
format: html
---

``{css}

.bigger{
  font-size: 5em; 
}

``


# allo peeps `r emo::ji("airplane")`

## Quantas `r emo::ji("airplane")`

![](https://www.wwf.org.uk/sites/default/files/styles/max_650x650/public/2022-05/_WW236934.jpg?itok=JlG-1l9V)

Here's a nice looking koala `r emo::ji("koala")`

Is this one even bigger? [`r emo::ji("koala")`]{.bigger}


::: {.bigger}
`r fontawesome::fa("clapperboard", fill="#4287f5", fill_opacity = .3)`

`r fontawesome::fa("route", fill="#e241e8")`

`r fontawesome::fa("apple", fill="#e8a041")`
:::

---
title: "Emojis and Icons"
format: 
  pdf:
    pdf-engine: lualatex
    include-in-header: 
      - text:
          \usepackage{emoji}
engine: knitr
---

``{r emoji}
#| echo: false
#| warning: false
#| message: false

## https://ctan.math.washington.edu/tex-archive/macros/luatex/latex/emoji/emoji-doc.pdf

library(stringr)

emoji <- function(x) {
  if (knitr::is_latex_output()) {
 stringr::str_c("\\emoji{", str_replace_all(x, "_", "-"), "}")
  } else if (knitr::is_html_output()) {
 stringr::str_c(":", x, ":")
  } else x
}
``

# allo peeps `r emoji("airplane")`

## Quantas `r emoji("airplane")`

![](https://www.wwf.org.uk/sites/default/files/styles/max_650x650/public/2022-05/_WW236934.jpg?itok=JlG-1l9V)

Here's a nice looking koala `r emoji("koala")`

Is this one even bigger? \Huge `r emoji("koala")`


`r fontawesome::fa("clapperboard", fill="#4287f5", fill_opacity = .3)`

`r fontawesome::fa("route", fill="#e241e8")`

`r fontawesome::fa("apple", fill="#e8a041")`

1: The \Huge specification is a LaTeX command with similar effect as the .css .bigger

R for
Authoring!!

Open Office Hours
(March 04, 2025)

Recap of Session
#66:

🧐🥳 emojis & icons!!!

Today…

code annotation!!!

Session Info (March 04, 2025) Rendering: