我希望能够使用gmailR包发送R生成的HTML报告通过电子邮件内联(而不是作为附件)。我甚至无法使用gmailr发送基本的HTML电子邮件。我尝试了以下操作,但没有成功,需要一些帮助:
library(gmailr)
gmail_auth("oauth.token.json", scope = "compose")
test_email <- mime() %>%
to("you@gmail.com") %>%
from("me@gmail.com") %>%
subject("This is a subject")
test_email$body <- "I wish <b>this</b> was bold"
send_message(test_email)结果:消息发送成功,但正文是纯文本,而不是HTML。
尝试2
test_email <- mime() %>%
to("you@gmail.com") %>%
from("me@gmail.com") %>%
subject("This is a subject") %>%
html_body("I wish <b>this</b> was bold")
test_email$body结果: test_email$body为空
尝试3
test_email <- mime() %>%
to("you@gmail.com") %>%
from("me@gmail.com") %>%
subject("This is a subject")
test_email$body <- html_body("I wish <b>this</b> was bold")结果: mime$parts中的错误:$ operator对原子向量无效
尝试4
test_email <- mime() %>%
to("you@gmail.com") %>%
from("me@gmail.com") %>%
subject("This is a subject")
test_email$parts <- c(html_body("I wish <b>this</b> was bold"),text_body("plain"))结果: mime$parts中的错误:$ operator对原子向量无效
发布于 2015-11-04 11:52:33
这就是我试过的:
library(gmailr)
gmail_auth('mysecret.json', scope = 'compose')
test_email <- mime() %>%
to("to@gmail.com") %>%
from("from@gmail.com") %>%
subject("This is a subject") %>%
html_body("<html><body>I wish <b>this</b> was bold</body></html>")
send_message(test_email)德国gmail.)

看起来,窍门只是简单地放入真正的HTML --包括<html>和<body> --以使gmail理解。
https://stackoverflow.com/questions/30144876
复制相似问题