部署后的Golem版Shiny应用无会话隔离问题求助

问题根源 #

多窗口筛选器同步的核心问题是代码里用了全局共享状态。Shiny本身默认每个浏览器会话是完全独立的，但如果你的模块或应用代码中使用了全局变量、全局reactive对象（比如用<<-赋值、定义在global.R或模块外部的变量），所有打开的会话会共享这些状态，导致操作互相影响。

代码层面的修复方法 #

1. 用会话专属环境存储状态 #

不要用全局变量，改用当前会话的session$userData来存储每个会话独有的筛选状态：

# 在模块的server函数内初始化会话专属状态
moduleServer("filter_module", function(input, output, session) {
  # 创建会话专属的响应式状态
  session$userData$filter_states <- reactiveValues(
    selected_date = Sys.Date(),
    selected_type = "all"
  )
  
  # 绑定筛选器输入到专属状态
  observe({
    session$userData$filter_states$selected_date <- input$date_picker
  })
})

Golem框架本身推荐模块间通过参数传递状态，不要依赖全局共享，所以调用模块时可以直接把session$userData或特定状态对象传进去。

2. 规范reactive对象的作用域 #

所有reactive值、reactive表达式必须定义在模块server函数或主server函数内部，绝对不能放在全局环境：

# 错误示例：全局reactive，所有会话共享
global_reactive_filter <- reactive({ input$category })

# 正确示例：会话级reactive，仅当前会话可用
server <- function(input, output, session) {
  local_filter <- reactive({ input$category })
  # 调用模块时传递这个local_filter
  product_module_server("product", filter = local_filter)
}

3. 利用Golem的状态管理工具 #

Golem提供的golem::set_golem_options()和golem::get_golem_options()可以区分应用级全局配置和会话级状态。会话级状态要在主server函数内初始化：

server <- function(input, output, session) {
  # 初始化会话专属的应用状态
  session$userData$app_state <- reactiveValues()
  # 给模块传递这个会话状态
  dashboard_module_server("dash", state = session$userData$app_state)
}

托管方配置的影响 #

正常情况下，Shiny Server、Posit Connect这类托管平台默认每个浏览器会话会启动独立的R进程/线程，不会出现会话共享的情况。除非托管方特意开启了会话复用（非常罕见），才可能导致状态同步。可以检查：

• Shiny Server：确认配置文件中worker_processes没有设置为强制共享进程；
• Posit Connect：默认无需额外配置，保持默认的会话隔离即可。

快速排查步骤 #

1. 全局搜索代码中的<<-、全局变量（比如global.R里的变量），全部替换为会话级存储；
2. 检查所有reactive对象的定义位置，确保不在模块或主server函数外部；
3. 用隐身窗口打开应用测试——如果隐身窗口里操作不同步，说明是浏览器缓存的问题；如果依然同步，肯定是代码里存在全局共享状态。

内容的提问来源于stack exchange，提问作者nimliug