r - 文件选择窗口在 R 主窗口后面打开

Question

我看到以前有人问过这个问题，但没有回答。在 R 会话期间第一次使用tcltk::tk_choose.files()时，它会在 R 主窗口后面打开。所有进一步的时间它都在主窗口前面打开（它应该！）。有没有办法让它总是在最前面？最终我想通过下面的闪亮使用它。所以它也应该在闪亮的窗户前面。

library(shiny)

ui <- fluidPage(
    actionButton("do", "Open window")
)

server <- function(input, output, session) {
    observeEvent(input$do, {
        tcltk::tk_choose.files()
    })
}

shinyApp(ui, server)

我知道base::file.choose()和utils::choose.files()。但是，第一个不允许一次选择多个文件，第二个不允许复制/粘贴路径以加快导航速度，这让我抓狂，..