闪亮的输出取决于浏览器

时间:2014-11-14 13:23:21

标签: r browser shiny

我的闪亮应用程序在Internet Explorer上运行不正常,我希望此浏览器不会显示该应用程序。

你知道我能发现浏览器的任何R功能吗?

示例:

if( browser = IE){    
    "use Mozilla, chrome or safari"}    
else{
    run my app}

谢谢!

路易斯

1 个答案:

答案 0 :(得分:1)

session$request包含HTTP_USER_AGENT值(如果有)。您可以使用它来计算出正在使用的浏览器:

library(shiny)
runApp(list(
  ui = bootstrapPage(
    textOutput("text")
  ),
  server = function(input, output, session) {
    myReactives <- reactiveValues(ua = session$request$HTTP_USER_AGENT)
    output$text <- renderText({
      myReactives$ua
    })
  }
))