First we will construct a simple text only message
text_msg <- gm_mime() %>% gm_to("firstname.lastname@example.org") %>% gm_from("email@example.com") %>% gm_text_body("Gmailr is a very handy package!")
You can convert the message to a properly formatted MIME message using
You can also construct html messages. It is customary to provide a text only message along with the html message, but with modern email clients this is not strictly necessary.
html_msg <- gm_mime() %>% gm_to("firstname.lastname@example.org") %>% gm_from("email@example.com") %>% gm_html_body("<b>Gmailr</b> is a <i>very</i> handy package!")
You can add attachments to your message in two ways.
gm_attach_file(). The mime type is automatically guessed by
mime::guess_type, or you can specify it yourself with the
write.csv(file = "iris.csv", iris) msg <- html_msg %>% gm_subject("Here are some flowers") %>% gm_attach_file("iris.csv")
gm_attach_part()to attach the binary data to your file.
msg <- html_msg %>% gm_attach_part(part = charToRaw("attach me!"), name = "please")
You can also add use attached images in HTML by setting the Content ID feature
of mime emails. This can be done by referencing the image via a
src=cid:xyz> tag using the
id argument of
send_file(). The tag value can
by any unique identifier. E.g. here is an example of including a ggplot2 image
# First create a plot to send, and save it to mtcars.png mtcars$gear <- as.factor(mtcars$gear) png("mtcars.png", width = 400, height = 400, pointsize = 12) with(mtcars, plot(hp, mpg, col = as.factor(gear), pch = 19, xlab = "Horsepower", ylab = "Miles / gallon" ) ) legend("topright", title = "# gears", pch = 19, col = seq_along(levels(mtcars$gear)), legend = levels(mtcars$gear) ) dev.off() # Next create an HTML email that references the plot as 'foobar' email <- gm_mime() %>% gm_to('firstname.lastname@example.org') %>% gm_from("email@example.com") %>% gm_subject("Cars report") %>% gm_html_body( '<h1>A plot of <b>MotorTrend</b> data <i>(1974)</i></h1> <br><img src="cid:foobar">') %>% gm_attach_file("mtcars.png", id = "foobar")
You can upload any mime message into your gmail drafts using
Be sure to give yourself at least
compose permissions first.
This inserts the message directly into your mailbox, bypassing gmail's default scanning and classification algorithms.
This imports the email as though it was a normal message, with the same scanning and classification as normal email.
gm_send_draft() sends an email using the
draft_id of an existing draft
(possibly created with
my_drafts <- gm_drafts() gm_send_draft(gm_id(my_drafts, "draft_id"))
You can also send an email message directly from a
mime object using
It is possible to have a high-functioning Google account that does not have
Gmail enabled. For example, your account might be fully operational with
respect to Google Drive and yet have no mail capabilities. Such an account
cannot be used with the Gmail API and therefore with
gmailr. However, you
will still be able to complete the
gmailr authorization process via
gmail_auth(). The problem will only reveal itself upon the first attempt to
use the API and it will look something like this:
Error in gmailr_POST(c("messages", "send"), user_id, class = "gmail_message", : Gmail API error: 400 Mail service not enabled
You can confirm the account's lack of mail capability by visiting https://mail.google.com/mail/ while logged in. If you don't already have Gmail, this link gives you the option of adding mail to your existing account or creating a new, mail-capable account.
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.