使用 htmlwidget 将交互式绘图保存到路径

Question

我正在尝试将一些交互式图形保存到额外的文件中。这与htmlwidget::saveWidget. 但我将它们保存到不同的文件夹中时遇到问题，例如保存到结果文件夹中。

results_dir <- 'results'
if(!dir.exists(results_dir)) dir.create(results_dir)
p <- plotly::plot_ly(economics, x = ~date, y = ~pop, 
             type = 'scatter', mode = 'markers')
htmlwidgets::saveWidget(p, 
                        file.path(results_dir, 'VSGs.html'))

错误信息是：

NormalizePath(basepath, "/", TRUE) 中的错误：
path[1]="results"：没有这样的文件或目录

有人知道发生了什么事吗？

我知道之后只是移动文件，但我更希望解决此错误消息。

htmlwidgets::saveWidget(p, 'VSGs.html')
file.rename('VSGs.html', file.path(results_dir, 'VSGs.html'))

Answer 1

“结果”似乎不是有效路径，
请尝试设置存在的文件夹的完整路径。
这应该有效：

dir.create(paste0(getwd(),"/results"))
results_dir = paste0(getwd(),"/results") # get directory

然后使用 results_dir 作为保存路径。