r - GmailR 在电子邮件正文中发送 data.frame

Question

我想使用 gmailR 在电子邮件正文中发送 data.frame 数据。我也试过 htmlTable。 msg = htmlTable(data,rnames=FALSE)

html_bod <- paste0("<p> This is a test email. </p>", msg)

# sending mail
use_secret_file("/Users/abhishekgupta/Downloads/gmailR.json")



msg = htmlTable(data,rnames=FALSE)

html_bod <- paste0("<p> This is a test email. </p>", msg)

# sending mail
use_secret_file("/Users/abhishekgupta/Downloads/gmailR.json")



test_email <- mime(
  To = "1234@gmail.com",
  From = "1234@pharmeasy.in",
  Subject = "Data City Wise",
  body = html_bod,
  html =TRUE)

send_message(test_email)

Answer 1

您可以使用 html_body() 代替 body 参数。

加载包:

library(gmailr)
library(tableHTML)

使用 tableHTML 创建 HTML 表格:

msg = tableHTML(mtcars)

在表格前加一段:

html_bod <- paste0("<p> This is a test email. </p>", msg)

创建 MIME 消息并发送:

mime() %>%
  to("1234@gmail.com") %>%
  from("1234@pharmeasy.in") %>%
  subject("Data City Wise") %>% 
  html_body(html_bod) %>% 
  send_message()

这是电子邮件在 gmail 中的样子: