cor_graph <- function(data, title=NULL){
require(highcharter)
hchart(cor(data))%>%
hc_subtitle(text="Correlaciones")%>%
hc_title(text=title)%>%
hc_legend(layout = 'vertical',
align = 'right',
verticalAlign= 'middle')
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.