knitr::opts_chunk$set(echo = TRUE) library(gt) library(tidyverse)
Create a table with an inserted image.
gt(tibble(a = paste0("\\includegraphics[width=0.5 in]{", test_image(), "}"))) %>% fmt_passthrough(columns = "a", escape = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.