Shiny Server无法将生成的HTML复制到www目录问题求助

问题核心 #

你遇到的问题是Shiny Server运行进程对目标www目录没有写入权限：

• 本地环境下你的个人账号拥有目录读写权限，因此file.copy操作正常
• Shiny Server默认以shiny系统账号（或指定服务账号）运行，该账号无你的应用www目录的写入权限
• 手动放置文件正常是因为操作使用的是具备权限的系统登录账号

可行解决方案 #

1. 调整www目录权限（推荐） #

直接给Shiny Server运行账号赋予www目录的读写权限：

• 登录服务器，定位到你的Shiny应用根目录（示例路径：/srv/shiny-server/your-app/）
• 执行以下命令（假设Shiny运行账号为shiny）：

sudo chown -R shiny:shiny /srv/shiny-server/your-app/www
sudo chmod -R 755 /srv/shiny-server/your-app/www

• 此操作会让shiny账号完全拥有该目录的读写权限，后续file.copy即可正常执行

2. 绕过www目录直接加载临时文件（无需权限调整） #

如果不想修改目录权限，可以通过addResourcePath暴露临时目录，让iframe直接加载生成的HTML：

resp <- data.frame("Ticket" = 2983, 'product' =  "Black Angus cheeseburger")
params <- list(datos = resp)

src <- normalizePath('ticket.Rmd')
owd <- setwd(tempdir())
on.exit(setwd(owd))
file.copy(src, 'report.Rmd', overwrite = TRUE)
out <- rmarkdown::render('report.Rmd', 
          output_format = 'html_document', params = params, 
          envir = new.env(parent = globalenv()))

# 将临时目录映射为Shiny可访问的资源路径
addResourcePath("temp_tickets", tempdir())
# 构造iframe可访问的路径
ticket_url <- file.path("temp_tickets", basename(out))

showModal(div(class = "modal-ticket",
              modalDialog(tags$iframe(src = ticket_url,
                                      scrolling = 'no',
                                      height = '350px'),
                          easyClose = TRUE, size = 'l',
                          footer = modalButton("No ticket")
              ))
)

• addResourcePath会把系统临时目录注册为Shiny应用的可访问路径，无需复制文件到www目录即可实现iframe加载

3. 权限排查验证代码 #

若需确认是否为权限问题，可在代码中加入以下检查：

curdir <- getwd()
www_dir <- paste0(curdir,'/www')
# 输出目录权限信息
cat("WWW目录权限详情:\n")
print(file.info(www_dir))
# 检查是否具备写入权限
cat("是否可写入该目录:", file.access(www_dir, 2) == 0, "\n")

• 若输出是否可写入该目录: FALSE，则可确认是权限导致的问题

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