Puede que se de el caso de que encuentres algún problema en tu código o proyecto, recuerda probar siempre en un entorno de testing antes subir el código al trabajo final.
Solución:
Esto es posible, consulte https://stackoverflow.com/a/21930556/448145 Solo agregue:
msg <- mime_part(message)
msg[["headers"]][["Content-Type"]] <- "text/html"
sendmail(from, to, subject, msg = msg, ...)
enviarcorreoR no puede hacer esto porque está codificado para enviar la parte del mensaje como texto. Si observa la fuente de los paquetes, la línea 38 de sendmail.R es la siguiente:
writeLines("Content-Type: text/plain; format=flowedrn", sock, sep="rn")
cambiar eso a
writeLines("Content-Type: text/html; format=flowedrn", sock, sep="rn")
como intentaste hacer a través de las opciones y funcionará.
Actualizar: enviarcorreoR ahora permite correos electrónicos html (consulte la respuesta de Karl a continuación y https://stackoverflow.com/a/21930556/448145).
Con el paquete mailR (https://github.com/rpremraj/mailR), puede enviar correos electrónicos HTML con facilidad como se muestra a continuación:
send.mail(from = "[email protected]",
to = c("[email protected]", "[email protected]"),
subject = "Subject of the email",
body = "The apache logo -
",
html = TRUE,
smtp = list(host.name = "smtp.gmail.com", port = 465, user.name = "gmail_username", passwd = "password", ssl = TRUE),
attach.files = c("./download.log", "upload.log"),
authenticate = TRUE,
send = TRUE)