gpt4 book ai didi

r - 将用户输入(Shiny 应用程序)保存到 R 中的全局变量

转载 作者:行者123 更新时间:2023-12-04 11:42:42 46 4
gpt4 key购买 nike

我想在我的全局环境中将用户选择保存为字符向量,以用于进一步分析作为输入(my_choices 下拉菜单)如何保存选择的内容?

例子:

library("shiny")
library("shinyWidgets")

my_choices <- c(
"2018Q1","2018Q2","2018Q3", "2018Q4", "2019Q1", "2019Q2")

ui <- fluidPage(

pickerInput(
inputId = "id",
label = "SELECT PERIOD:",
choices = my_choices,
selected = NULL,
multiple = TRUE,
options = list(
`actions-box` = TRUE, size = 15, `selected-text-format` = "count > 3"
),
choicesOpt = list(
content = stringr::str_trunc(my_choices, width = 75)
)
),
verbatimTextOutput(outputId = "res")
)

server <- function(input, output, session) {
output$res <- renderPrint(input$id)
}

shinyApp(ui = ui, server = server)

最佳答案

尝试使用双箭头进行全局赋值:

observe({
your_global_variable <<- input$id
})

或使用 assign()功能:
observe({
assign(
x = "your_global_variable",
value = input$id,
envir = .GlobalEnv
)
})

关于r - 将用户输入(Shiny 应用程序)保存到 R 中的全局变量,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/52475478/

46 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com