R: Вставить данные в почтовое тело Outlook, используя R - PullRequest
Новая
       7

R: Вставить данные в почтовое тело Outlook, используя R

0 голосов
/ 14 декабря 2018

Я использую следующий код для отправки электронной почты 

library(RDCOMClient)
library(openxlsx)
library(xtable)

OutApp <- COMCreate("Outlook.Application")
outMail = OutApp$CreateItem(0)
outMail[["To"]] = "ex@example.com"
outMail[["subject"]] = paste0("Report ", Sys.Date() - 1)

wb <- createWorkbook()
addWorksheet(wb, "S1")
writeDataTable(wb, "S1", x = head(iris))
saveWorkbook(wb, tf <- tempfile(fileext = "xlsx"))
df <- read.xlsx(tf)
df_html <- print(xtable(df), type="html", print.results=FALSE)

outMail[["Attachments"]]$Add(tf)
outMail[["HTMLBody"]] = sprintf('
Hello world, here is the table:
 %s
Merry Christmas & a happy New Year!
', df_html) # add your html message content here
outMail$Send()

Единственное отличие состоит в том, что я хочу вставить диапазон ячеек из рабочей книги (уже сохранен) в качестве изображения в телеЭл. адрес.Как это можно сделать?

...