आर चमकदार: रनएप को कॉल करते समय एक स्टैंडअलोन ब्राउज़र विंडो चला रहा है

Question

मैं options(browser=path/to/browser/exe सेट करके ब्राउज़र में एक स्टैंडअलोन आर चमकदार ऐप चला रहा हूं) और shiny::runApp("path/to/app", launch.browser=TRUE) का उपयोग कर रहा हूं। समर्थन करने के लिए ब्राउज़र एमएसआईई (डिफ़ॉल्ट) है, लेकिन, यदि उपलब्ध हो, तो यह क्रोम या फ़ायरफ़ॉक्स भी हो सकता है। मेरा लक्ष्य ऐप को चलाने के लिए है जैसे कि एक स्टैंडअलोन क्रोम ऐप के लिए --app= कमांड लाइन विकल्प का उपयोग करना, यानी एक नई ब्राउज़र विंडो में, जो मेनूबार और टूलबार से छीन लिया गया है, लेकिन टाइटलबार को संरक्षित करता है (इसलिए "कियोस्क" में नहीं मोड), और, यदि संभव हो, ब्राउज़र की किसी अन्य सामग्री के बिना (जैसे पहले खोले गए टैब या होम पेज)। ऐसा करने का सबसे अच्छा तरीका क्या है?

उदाहरण के लिए, जावास्क्रिप्ट का उपयोग, एक कहेंगे:

window.open("http://127.0.0.1:5555/", "MyApp", "menubar=no,toolbar=no,location=no"); 

जो काम (+/- location=no के लिए असंगत समर्थन, अर्थात् पता पट्टी है, जो मैं के साथ रह सकते हैं अक्षम करने) करना होगा। अब, आर शाइन का उपयोग करके इसे कैसे करें?

Answer 1

यह बहुत ही सुरुचिपूर्ण नहीं है, लेकिन आप इंटरनेट एक्सप्लोरर को COM इंटरफ़ेस द्वारा प्रारंभ कर सकते हैं उदा। पैकेज RDCOMClient।

प्रलेखन राज्यों के रूप में, launch.browser तर्क भी एक समारोह जो ऐप्लिकेशन का URL दिया जाता है हो सकता है, इसलिए हम वहाँ वस्तु बना सकते हैं: सीधे [खुलने चमकदार App का

library(RDCOMClient) 

runApp("path/to/app", 
     launch.browser = function(shinyurl) { 

     ieapp <- COMCreate("InternetExplorer.Application") 
     ieapp[["MenuBar"]] = FALSE 
     ieapp[["StatusBar"]] = FALSE 
     ieapp[["ToolBar"]] = FALSE 
     ieapp[["Visible"]] = TRUE 
     ieapp$Navigate(shinyurl) 

     })