Envie um anexo em R com o gmail
Desejo enviar um email em R com um anexo usando o gmail. Descobri que o sendmailR não funciona com o gmail porque requer autenticação (não consegui fazê-lo funcionar com o gmail, portanto, presumo que isso seja verdade, a menos que alguém me diga que estou errado; nesse caso, postarei o R saída e mensagem de erro para isso). Encontrei um snippet de código encontradoaqui (LINK). Como o site sugere, o código não está formatado para enviar anexos, mas eu tenho que enviar um email. Gostaria de estender esse código para enviar anexos (em uma correspondência por email, o autor deste código não conseguiu estender o código para enviar anexos
Eu quero enviar e-mails com R usando o gmail. Eu sou um usuário do Windows 7 com a versão 2.14 beta do R.
O código que envia emails, mas não anexos:
require(rJython)
rJython <- rJython()
rJython$exec( "import smtplib" )
rJython$exec("from email.MIMEText import MIMEText")
rJython$exec("import email.utils")
mail<-c(
#Email settings
"fromaddr = '[email protected]'",
"toaddrs = '[email protected]'",
"msg = MIMEText('This is the body of the message.')",
"msg['From'] = email.utils.formataddr(('sender name', fromaddr))",
"msg['To'] = email.utils.formataddr(('recipient name', toaddrs))",
"msg['Subject'] = 'Simple test message'",
#SMTP server credentials
"username = '[email protected]'",
"password = 'pw'",
#Set SMTP server and send email, e.g., google mail SMTP server
"server = smtplib.SMTP('smtp.gmail.com:587')",
"server.ehlo()",
"server.starttls()",
"server.ehlo()",
"server.login(username,password)",
"server.sendmail(fromaddr, toaddrs, msg.as_string())",
"server.quit()")
jython.exec(rJython,mail)
Observe que esta mensagem é postada cruzadamente em talkstats.com. Não recebi uma resposta lá (apenas os membros me disseram que gostariam de poder ajudar). Se eu receber uma solução viável, também a publicarei lá.