r - 如何以高质量保存绘图图形？

Question

在我保存之前，我精心制作的每个图形看起来都很棒，所以图像看起来有点无光泽，如果有意义的话，只是质量很差。有谁知道如何以高质量保存它？您可以使用此基本图表作为示例。

library(plotly)

x <- c(1:100)
random_y <- rnorm(100, mean = 0)
data <- data.frame(x, random_y)

p <- plot_ly(data, x = ~x, y = ~random_y, type = 'scatter', mode = 'lines')

谢谢!

Answer 1

至少在 Plotly v4.7.1+ 中，您可以将图形导出为 SVG(由于是矢量图形格式，因此质量可能最高)。

为此，您需要拥有包 Rselenium安装。然后你可以使用 Plotly 的 export功能如下(在这个例子中使用 Chrome 作为 Selenium driver ):

if ( !require(RSelenium) ) {
  install.packages("RSelenium", repos = "https://cloud.r-project.org/")
}

p %>%
  export(file = "filename.svg",
         selenium = RSelenium::rsDriver(browser = "chrome"))

这会将图表下载为 filename.svg到您的默认下载目录(许多 Linux 发行版上的 ~/Downloads 或 Windows 上的 %USERPROFILE%\Downloads)。如果要将 SVG 下载到当前的 R 工作目录，则需要将几个选项传递给 Selenium 驱动程序(本例中为 Chrome):

p %>%
  export(file = "filename.svg",
         selenium = RSelenium::rsDriver(browser = "chrome",
                                        extraCapabilities = list(
                                          chromeOptions = 
                                            list(prefs = list(
                                              "profile.default_content_settings.popups" = 0L,
                                              "download.prompt_for_download" = FALSE,
                                              "download.default_directory" = getwd())
                                            ))))

可以在此 Gist 中找到更复杂的自定义导出功能，它允许设置导出的 SVG 的宽度和高度(以及更多，包括可选的 PDF 和 PNG 转换): https://gist.github.com/salim-b/32c4370cee4ac0a3fbfef13a9ce98458