CODEWITHSUNDEEP
rplotly
Slavatron
Slavatron

Reputation: 2358

Using R and plot.ly - how do I script saving my output as a webpage

I want to make some interactive graphs using R and plot.ly. When I run the following code in R-Studio, it produces an interactive graph. 

library(plotly)
set.seed(100)
d <- diamonds[sample(nrow(diamonds), 1000), ]
plot_ly(d, x = carat, y = price, text = paste("Clarity: ", clarity),
    mode = "markers", color = carat, size = carat)

After producing this graph, when I click on the "Export" button in the Plot window of R-Studio, it gives me the option to save the plot as a webpage. How can I script the process of saving produced plots as webpages? My ultimate goal is to run Rscripts iteratively from inside a bash script to produce multiple webpages.

Upvotes: 37

Views: 43916

Answers (2)

irritable_phd_syndrome
irritable_phd_syndrome

Reputation: 5067

Updating Andrew's answer for R-3.5.1 and plotly-4.8.0, i.e. : 

library(plotly)
set.seed(100)
d <- diamonds[sample(nrow(diamonds), 1000), ]
p <- plot_ly(d, x = ~carat, y = ~price, text=~paste("Clarity : ", clarity))
htmlwidgets::saveWidget(as_widget(p), "index.html")

In order to get this to work, you'll also need to install pandoc. On CentOS/RedHat do yum install pandoc pandoc-citeproc. On Mac OSX, using homebrew, do brew install pandoc.

This solution was tested and works on OSX 10.13.6 works in R-3.5.1.

Upvotes: 4

Andrew
Andrew

Reputation: 38629

Assign the plot_ly object to a variable and then use htmlwidgets::saveWidget() to save the actual file, like so:

library(plotly)
set.seed(100)
d <- diamonds[sample(nrow(diamonds), 1000), ]
p <- plot_ly(d, x = carat, y = price, text = paste("Clarity: ", clarity),
             mode = "markers", color = carat, size = carat)
htmlwidgets::saveWidget(as_widget(p), "index.html")

Upvotes: 75

Related Questions