如何使用 R 在邮件正文中发送 html 文件？

Question

由于我的 Rmarkdown 代码，我有一个 html 文件。现在我需要直接在电子邮件正文中而不是在附件中发送带有此 html 文件的电子邮件。我正在尝试这个 post 的解决方案："send HTML email using R" post 但它似乎只适用于 html 文本而不适用于 html 文件。这是我尝试做的事情：

library(sendmailR)
from<-"<sender@enterprise.lan>"
to<-c("<reciever@enterprise.com>")
message ="./TEST.html"
subject = "Test HTML"
msg <- mime_part(message)
msg[["headers"]][["Content-Type"]] <- "file/html"
sendmail(from, to, subject, msg = msg,control=list(smtpServer="localhost"),headers=list("Content-Type"="file/html; charset=UTF-8; format=flowed"))

这次试用给我发了一封电子邮件，但附有 "TEST.html" 文件，而不是直接在正文中。显然我做错了什么，我为这个任务苦苦挣扎了好几天，有人能帮帮我吗？

Answer 1

尝试使用 mailR 包轻松发送 HTML 格式的电子邮件，如下所示：

send.mail(from = "sender@gmail.com",
          to = c("recipient1@gmail.com", "recipient2@gmail.com"),
          subject = "Subject of the email",
          body = "<html>The apache logo - <img src=\"http://www.apache.org/images/asf_logo_wide.gif\"></html>", # can also point to local file (see next example)
          html = TRUE,
          smtp = list(host.name = "smtp.gmail.com", port = 465, user.name = "gmail_username", passwd = "password", ssl = TRUE),
          authenticate = TRUE,
          send = TRUE)

如何使用 R 在邮件正文中发送 html 文件？

how to send html file in the body of the mail using R?

html

email

r

sendmailr