我的示例数据集：
library(plotly)
library(htmlwidgets)
d <-
data.frame(
"name" = c("bily", "mary", "ken"),
"fruit" = c("cherry", "apple", "apple"),
"count" = c(1, 10, 30)
)
gg <- ggplot(data = d,
aes(x = fruit,
y = count,
group = name)) +
geom_line(aes(color = name)) +
geom_point(aes(color = name))
plotly <- ggplotly(gg)
保存图表：
d <- # please put your directory where you want to save the graph
"xxxx/graph.html"
我已经搜索了这三个可以输出 HTML 格式的函数，但它们也会生成其他文件，我无法解决。
#htmlwidgets::saveWidget(as_widget(plotly), d)
#htmltools::browsable(plotly)
htmltools::save_html(plotly, d)
我正在尝试将使用 ggplot 函数到 ggplotly 函数的图形转换为 HTML 格式，但我遇到了问题。当我保存图形时，该函数还会生成其他文件，例如 plotlyjs、jquery 和 crosstalk。我希望只能制作 HTML 文件，因为如果每个图形都有不同的文件，则很难将文件放在网站上。
这些是我运行代码时的文件。我的预期结果是只制作了 HTML 文件。
其他文件保存在 lib 的目录中，但我希望不提供它们，我可以运行 HTML 文件。有可能吗？或者还有其他方法吗？
