Plotly绘图不能在闪亮的服务器上呈现

Question

我正在使用情节包来显示闪亮的情节。 在我的本地机器上，情节渲染完美，但是当我在闪亮的服务器上运行闪亮的应用程序时，我收到错误“错误：无法打开文件'Rplots.pdf'”，其中应该渲染绘图。 我已经尝试使用dev.off（）命令，因为我已经阅读了一些其他可能的解决方案，并将其作为一种可能的解决方案。 下面我粘贴了我在server.R脚本中创建图形的代码：

    output$recSalesPlot <- renderPlotly({
       BWplot_rec <- ggplot(d1, aes_string(x = "End_of_Week", y = input$metric_rec))
            BWplot_rec <- BWplot_rec + geom_line(aes(color = Group), size = .25)
            BWplot_rec <- BWplot_rec + geom_point(aes(color = Group), size = 2)
            BWplot_rec <- BWplot_rec + xlab("Week")
            if(input$metric_rec == "NetSales"){
              BWplot_rec <- BWplot_rec + ylab("Euros")
            }
            BWplot_rec <- BWplot_rec + ggtitle(paste0("Average ", input$metric_rec, " Per Group Per Week"))
            BWplot_rec <- BWplot_rec + guides(color=FALSE)
            BWplot_rec <- BWplot_rec + theme(panel.grid.major.y = element_blank(),
                                             panel.grid.minor.y = element_blank())
            p <- ggplotly(BWplot_rec)
            p
          })
}

在ui.R脚本中，我使用以下命令调用绘图：

plotlyOutput("recSalesPlot", width = "100%", height = 600)

Answer 1

我不能说我理解问题的根源或为什么我的解决方案甚至适用于我，但我遇到了同样的问题，只是在我的脚本开头添加了pdf(NULL) ，一切似乎都运行得很好。 不需要dev.off() （为我添加错误）。

Answer 2

像这样的错误通常意味着您的目录不属于正在运行闪亮服务器的用户。

我建议避免使用@jenwen的答案，因为它通过不尝试编写中间文件来绕过根问题，但通常会导致Error in plot(NULL): too many open devices中的Error in plot(NULL): too many open devices用户使用Error in plot(NULL): too many open devices 。

更好的解决方案是遵循闪亮服务器的惯例：当将应用程序放入闪亮的服务器目录时，例如/srv/shiny-server/app-name ，我将权限更改为已配置为运行闪亮的用户-服务器：

sudo chown -R shiny:shiny /srv/shiny-server/app-name

这样，用户可以毫无问题地编写和删除该应用程序中的临时目录。

Answer 3

一般来说，jenwen的答案是正确的，但是：请注意，你应该在renderPlotly()添加pdf(NULL) ， renderPlotly()不是在脚本的开头。 而且如果你开始用pdf(NULL)多次调用renderPlotly() ，它将创建一个“太多打开的设备”错误，它会杀死服务器上的所有图形设备，包括png，tiff等，而不仅仅是pdf。 要解决它 - 就在pdf(NULL)之前，你可以调用graphics.off()来清除当前打开的所有设备，一次只有一个。