我的问题很简单。我正在构建一个Shiny应用程序,用户可以在其中使用按钮在预定义的语言之间切换。但是,我想以文本中已经显示的用户语言开始每个会话,因此,有没有办法像在返回字符变量的函数中那样检索用户在浏览器或操作系统中定义的语言?
我看到该站点上已经有很多关于此主题的问题,但是除了R / Shiny之外还有其他计算语言,我不知道如何使它们适应R。谢谢
一个普通的JavaScript代码获取浏览器语言使用上运行runjs
的shinyjs
程序包(而不是这可能与运行tags$script
过)。还要注意,浏览器语言值存储在javascript变量中language
,然后将其传递回R并显示为文本。
jscode <- "var language = window.navigator.userLanguage || window.navigator.language;
Shiny.onInputChange('mydata', language);
console.log(language);"
library(shiny); library(shinyjs)
shinyApp(
ui = fluidPage(
useShinyjs(),
"This is your browser language",
textOutput('your_lang')
),
server = function(input, output,session) {
runjs(jscode)
output$your_lang <- renderPrint(input$mydata)
}
)
屏幕截图:
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句