चमकदार

Question

से एक अनुलग्नक भेजना मैंने चमकदार का उपयोग करके एक एप्लिकेशन बनाया है और shinyapps.io से संबंधित सर्वर पर अपलोड किया है; मैंने इसका परीक्षण किया है और सब ठीक है। मेरा एप्लिकेशन सर्वर के माध्यम से बनाता है। एक टेक्स्ट फ़ाइल जो मैं अपने ईमेल पर भेजना चाहता हूं जब कोई उपयोगकर्ता कोई कार्य निष्पादित करता है। मैं उस फाइल को अपने ईमेल पर भेजना चाहता हूं क्योंकि मुझे उन तरीकों को देखने का तरीका नहीं दिख रहा है, जो चमकदार एप्लिकेशन shinyapps.io व्यवस्थापक टूल में आउटपुट करते हैं। तो नीचे की रेखा, मैं अपने ईमेल पर चमकदार एप्लिकेशन से एक फाइल कैसे भेज सकता हूं?

उदाहरण के लिए अगर मैं निम्नलिखित है:

library(sendmailR) 
datos<-read.table("data.txt") 
to <- "<loretta@gmail.com>" 
subject <- "Email Subject" 
body <- "Email body."      
mailControl=list(smtpServer="ASPMX.L.GOOGLE.COM") 
sendmail(from="localhost",to=to,subject=subject,msg=body,control=mailControl) 
attachmentObject <- mime_part(name=datos) 
bodyWithAttachment <- list(body,attachmentObject) 
sendmail(from="localhost",to=to,subject=subject,msg=bodyWithAttachment,control=mailControl) 

मुझे पता है कि मैं क्या हिस्से से में क्या रखना चाहिए चाहते हैं, मेरा मतलब है मैं इसे स्थानीय होस्ट डाल दिया है, लेकिन मैं लगाने की जरूरत है चमकदार एप्लिकेशन कहां चल रहा है उसका पता; मैं कहां से प्राप्त कर सकता हूं?

इसके अलावा जब मैं ऊपर कोड चलाने के लिए, नहीं एक चमकदार वातावरण में, लेकिन एक स्क्रिप्ट के रूप में मैं निम्न त्रुटि sendmail भाग के बाद मिल गया:

Error in wait_for(code) : 
    SMTP Error: 5.5.2 Syntax error. g22si4860678yhc.87 - gsmtp 

किसी भी मदद महान

Answer 1

यह काम करता है हो सकता है मेरे लिए mailR लाइब्रेरी का उपयोग कर दृष्टिकोण से ईमेल भेजने के लिए:

library(mailR) 

bodyMsg <- "Some message to be included in the body of the email" 

send.mail(from = "sender@xyz.com", to = "receiver@xyz.com", subject = "Some topic", 
       body = bodyMsg , authenticate = TRUE, html = TRUE, send = TRUE, attach.files = file.path(folder, fileName), 
       smtp = list(host.name = "abcdef.xyz.com", port = 587, user.name = "sender@xyz.com", passwd = "password", tls = TRUE))}