How to render tinytable styled HTML tables in pkgdown examples?

[friendly]

I filed this question as an issue for tinytable: vincentarelbundock/tinytable#624
but perhaps the solution is more directly related to pkgdown.

Brief Description

When using tinytable in function examples that are rendered by pkgdown::build_site(), the tables appear as plain text/markdown tables rather than styled HTML tables with colors and backgrounds. This makes it difficult to showcase the visual styling capabilities of tinytable in package documentation.

Current Behavior

In my package VisCollin, I have a function tt.colldiag() that creates styled tables with background colors and variable font sizes:

https://github.com/friendly/VisCollin/blob/master/R/tt.colldiag.R

When I run an example in the RStudio console, this is what appears in the Viewer tab, which is what I want

When I run pkgdown::build_site(), the examples execute but the output appears as plain text tables instead of rendered HTML with the styling preserved.

What I've Tried

1. Setting output option conditionally:

   if (knitr::is_html_output()) options(tinytable_print_output = "html")

   Result: No effect in pkgdown examples

2. Explicitly calling print with output parameter:

   tt(cd) |> print(output = "html")

   Result: Error: x must be a data.frame`

3. Checking tinytable's own pkgdown site:
   Even the tinytable documentation examples section appears to show only code, not rendered styled tables

[jayhesselberth]

What's the class of the output? Wondering if pkgdown_print() will help.

[friendly]

The result is of class "tinytable".
Vincent Arel-Bundock just added a pkgdown_print.tinytable() method:

Version 0.15.2.1 on Github adds a pkgdown_print.tinytable() method. I ran a test in a very minimal package and simple tables seem to be working.

However, pkgdown seems to override some of tinytable's CSS or JS. Some feature may thus fail, but I'm not sure which ones, and I don't know pkgdown well-enough to know how to circumvent the issue.

However, with the documentation examples for my function (after @examples), I still get the same result as before.

A difficulty is that I can't explicitly call a special pkgdown print method in a documentation example. In the README example, I had to do the following in a code chunk:

```{r tt-colldiag}
#| out-width: "60%"
tt(cd,
   descending = TRUE,
   fuzz = 0.3,
   font.scale = c(1, 1.5)) |>
  save_tt("man/figures/README-tt-colldiag.png", overwrite = TRUE)

knitr::include_graphics("man/figures/README-tt-colldiag.png")
```