如何在生成R降价报告时以任何格式（PDF、HTML、WORD）发送电子邮件？

我有一个R闪亮的应用程序，它根据用户单击的内容以任何格式生成R降价报告。 每次生成此报告时，我都想通过电子邮件将其发送给自己

---

我似乎在网上找不到太多关于这方面的信息。我想知道是否有人知道如何开始这个

你可以试试

mailR

软件包。从，您可以发送电子邮件并使用attach.files附加相关报告

library(mailR)
send.mail(from = "sender@gmail.com",
          to = c("recipient1@gmail.com", "recipient2@gmail.com"),
          subject = "Subject of the email",
          body = "Body of the email",
          smtp = list(host.name = "smtp.gmail.com", port = 465, ssl = TRUE,
                      user.name = "gmail_username", passwd = "password"),
          authenticate = TRUE,
          send = TRUE,
          attach.files = c("./download.log"),
          file.names = c("Download log.log"),
          file.descriptions = c("Description for download log"))

sendmailR

可以获得类似的结果，但附件是使用

mime\u part（）

添加到电子邮件正文的

库（sendmailR）
如果您使用Outlook，我建议您使用RDCOMClient包

install.packages(RDCOMClient)
require(RDCOMClient)

OutApp <- COMCreate("Outlook.Application")
outMail = OutApp$CreateItem(0)
outMail[["To"]] = "you@domain.com"
outMail[["subject"]] = "subject here"
outMail[["htmlbody"]] = "email text"
outMail[["Attachments"]]$Add("c:/file.blah")
outMail$Send()

install.packages（RDCOMClient）
要求（RDCOMClient）
OutApp
install.packages(RDCOMClient)
require(RDCOMClient)

OutApp <- COMCreate("Outlook.Application")
outMail = OutApp$CreateItem(0)
outMail[["To"]] = "you@domain.com"
outMail[["subject"]] = "subject here"
outMail[["htmlbody"]] = "email text"
outMail[["Attachments"]]$Add("c:/file.blah")
outMail$Send()