r - (R shiny) 使用 ggsave (ggplot2) 将图保存到选择的位置

Question

当我想将绘图下载为 pdf 时，我想要一个窗口，我可以在其中选择下载绘图的位置。这是我在服务器端的代码:

output$export = downloadHandler(
     filename = function() {"plots.pdf"},
     content = function(file) {
       ggsave(file="Analyse.pdf", width=11, height=8.5)

     }

现在它立即将文件下载到我的工作目录，但我希望有一个窗口可供我选择下载位置。也许这是一个愚蠢的问题，但通过在网络上找到解决方案，我还没有取得任何成功。

希望大家帮帮我!

Answer 1

我通过自己尝试代码找到了答案。这确实是一件愚蠢的事情。

output$export = downloadHandler(
     filename = function() {"plots.pdf"},
     content = function(file) {
       ggsave(**file**, device = "pdf", width=11, height=8.5)

     }
   )

我只需要将文件名更改为"file"。现在它会让我把它下载到一个选择的地方。我还添加了设备，以便将其另存为 PDF。

还是谢谢你!