Отправить вложение в R по электронной почте с помощью gmail

Я хочу отправить электронное письмо на R с вложением, используя gmail. У меня есть обнаружил, что sendmailR не работает с gmail, потому что он требует аутентификации (я не мог заставить его работать с gmail, поэтому я предполагаю, что это правда, если кто-то не скажет мне, что я ошибаюсь, и в этом случае я опубликую вывод R и сообщение об ошибке для этого). Я нашел фрагмент кода, найденный здесь (ССЫЛКА) . Как предлагает сайт, код не отформатирован для отправки вложений, но у меня есть его, чтобы отправить электронное письмо.Я хотел бы расширить этот код для отправки вложений (в электронной переписке автор этого кода не смог расширить код для отправки вложений).

Я хочу отправлять электронные письма с помощью R с помощью Gmail. Я пользователь Windows 7 с бета-версией 2.14 R.

Код, который отправляет электронные письма, но не вложения:

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 = 'bigbird@gmail.com'", 
"toaddrs  = 'oscarthegrouch@gmail.com'", 
"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 = 'bigbird@gmail.com'", 
"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) 

Обратите внимание, что это сообщение размещено на сайте talkstats.com. Я не получил там ответа (только участники говорили мне, что хотели бы помочь). Если я получу работоспособное решение, я также опубликую его там.