r - 在系统中没有 Outlook 应用程序的 R 中发送电子邮件

Question

我可以使用以下代码发送电子邮件。

OutlookForSend = RDCOMClient::COMCreate("Outlook.Application")
emailToSend = OutlookForSend$CreateItem(0)
emailToSend[["subject"]] = "Subject"
emailToSend[["HTMLBody"]] = bodyToSend
emailToSend[["To"]] = "Email"
emailToSend$Send()

但是，我没有在服务器机器上安装 Outlook，但仍然需要发送电子邮件。

我可以使用 Python 中的包邮件程序来实现相同的目标，在 R 中实现相同目标的最佳方法是什么。

谢谢

Answer 1

在 R 中实现的任何 SMTP 客户端都可以完成这项工作。看看这个：Rmailer

从他们的例子：

library(Rmailer)


message <- c(
  "Hey,",
  "",
  "I have a nice pic for you!",
  "",
  "Best",
  "C."
)


settings <- list(
  server = "smtp.example.org",
  username = "user",
  password = "password"
)


## send message:
sendmail(
  from = "sender@example.org",
  to = "receiver@example.org",
  subject = "Good news!",
  msg = message,
  smtpsettings = settings,
  attachment = "nice_pic.jpg"
)

Answer 2

使用mailR包解决了这个问题，它运行良好。

library(mailR)
send.mail(from = "email@company.com",
          to = "email@company.com",
          subject = subjectToSend ,
          body = bodyToSend,
          html = TRUE,
          smtp = list(host.name = "smtp.company.com", port = 25), 
          send = TRUE)