if (FALSE) {
p <- plot_ly(x = 1:10)
Png <- plotly_IMAGE(p, out_file = "plotly-test-image.png")
Jpeg <- plotly_IMAGE(p, format = "jpeg", out_file = "plotly-test-image.jpeg")
Svg <- plotly_IMAGE(p, format = "svg", out_file = "plotly-test-image.svg")
Pdf <- plotly_IMAGE(p, format = "pdf", out_file = "plotly-test-image.pdf")
}
Run the code above in your browser using DataLab