Как отобразить ggplot в электронной почте sendmailR внутри таблицы gt?

Question

Я пытаюсь отправить по электронной почте таблицу gt с помощью пакета sendmailR. В таблице gt есть столбец с ggplots. Когда я отправляю электронное письмо, все данные отображаются в нем, за исключением того, что столбец ggplots пустой. Ниже мой код

library(gt)
library(sendmailR)

gttable  # this contains gt table
 msg <-paste("
 Here is a table that shows a breakdown:", {(as_raw_html(gttable,inline_css = TRUE))})%>%
   sendmailR::mime_part()
   msg[["headers"]][["Content-Type"]] <- "text/html" 
   sender <- "senderemail"
   recipients <- c("recepientsemail")
   subject <- "sendmailR"
   sendmail(sender, recipients, subject, list(msg),control=list(smtpServer="server name"))

Электронное письмо отправлено, и в нем отображается таблица, но столбец, содержащий ggplots, пуст. Как вывести столбец с графиками?