Shiny Server为何在数据源文件改名后仍保留旧数据？

这事儿我在部署Shiny应用时碰到过好几次，核心原因基本绕不开内存缓存或者进程未重启，给你详细拆解下：

可能的原因 #

• Shiny Server应用进程缓存：当Shiny Server启动你的app1.R时，会把读取的BDH.xlsx数据加载到应用进程的内存里。你只是重命名文件并刷新网页，并没有触发应用进程重启，所以内存里还是旧的数据集，自然显示旧数据。
• R的文件读取缓存：部分读取Excel的R包（比如readxl）或者R本身会对已读取的文件做缓存优化，即使磁盘上的文件变了，R可能还是复用之前加载到内存的数据。
• 文件权限问题（次要但容易忽略）：重命名文件后，Shiny Server的运行用户（默认是shiny用户）可能没有新文件BDH0.xlsx的读取权限，导致应用无法读取新文件，只能 fallback 到之前缓存的旧数据。

对应的解决办法 #

1. 触发Shiny应用进程重启 #

这是最直接的方式：

• 简单操作：打开你的app1.R，随便加个空格或者空行然后保存，Shiny Server会检测到应用文件的变化，自动重启该应用的进程，重启后就会读取新命名的BDH0.xlsx。
• 批量操作：如果要重启所有Shiny应用，执行命令：

  sudo systemctl restart shiny-server
  

2. 在代码里强制读取最新文件 #

如果希望应用能自动检测文件变化并刷新数据，可以在代码里加入逻辑：

library(shiny)
library(readxl)

# 存储文件最后修改时间的全局变量
last_file_mtime <- NULL

ui <- fluidPage(
  # 你的UI代码
)

server <- function(input, output, session) {
  # 用reactive表达式动态读取数据
  reactive_data <- reactive({
    # 获取当前文件的修改时间
    current_mtime <- file.info("/K/BDH0.xlsx")$mtime
    # 如果文件修改时间变化，重新读取数据
    if (!identical(current_mtime, last_file_mtime)) {
      last_file_mtime <<- current_mtime
      read_excel("/K/BDH0.xlsx")
    } else {
      # 否则返回已加载的数据
      req(reactive_data())
    }
  })

  # 后续使用数据时调用 reactive_data()
  output$some_plot <- renderPlot({
    plot(reactive_data()$some_column)
  })
}

shinyApp(ui, server)

这种方式能让应用每次交互时都检查文件是否更新，自动加载最新数据。

3. 检查并修复文件权限 #

如果是权限问题，执行以下命令给shiny用户赋予文件读取权限：

# 更改文件所有者为shiny用户
sudo chown shiny:shiny /K/BDH0.xlsx
# 设置文件可读权限
sudo chmod 644 /K/BDH0.xlsx

内容的提问来源于stack exchange，提问作者Arnau Muns Orenga