Use raw typst in GT tables

[JosephBARBIERDARNAL]

Description

Hi!

I'm trying to display a GT table where part of the content is a raw typst, but I'm not sure if that's possible. I've tried a few things with lua filters but nothing works as expected. Here's what I'd like to do:

---
format: typst
---

```{r}
library(gt)

data <- data.frame(
  a = c(
    'box(fill: rgb("#005488"), inset: (x: 2pt, y: 4pt))[#text(fill: white)[Blue]] box(inset: (y: 4pt))[some other text]',
    "hello"
  ),
  b = c("hello", "hello")
)

gt::gt(data)
```

This gives:

I wouldn't expect it to work natively, but is there a way to make this to work? or a workaround?

[mcanouil]

You need two things (at least, that's the theory that I will try to confirm with more time):

• tell Quarto/gt that the cell is Markdown for gt to output the content as data-qmd (https://quarto.org/docs/authoring/tables.html#html-tables).
• tell that your Markdown is not Markdown, but it is a raw Typst content (https://quarto.org/docs/authoring/markdown-basics.html#raw-content).

---

Accessibility: To improve accessibility, please add alternative text to your screenshots. This helps all users, including those using screen readers, to understand the context of the images. A brief description can make a big difference! See Good Alt Text, Bad Alt Text — Making Your Content Perceivable.

[JosephBARBIERDARNAL]

Ok thanks!

[mcanouil]

I just edited to make it clear, that did not tested this particular example.
It works for footnotes, references in plain markdown, but not 100% sure the HTML table parser can make sense of the content here.

[mcanouil]

I confirm, it works.

---
format: typst
---

```{r}
library(gt)

data <- data.frame(
  a = c(
    '`#text(rgb("#005488"))[some other text]`{=typst}',
    "hello",
    "**bye**"
  ),
  b = c("hello", "hello", "world")
)

gt::gt(data) |>
  gt::fmt_markdown()
```

[JosephBARBIERDARNAL]

Thanks for the example. I confirm it works too, thanks again.