#just for the report, non interactive
# correlation_plot <- reactive({
#
#
# p <- MQanalyser::plot_correlationly(dep(), interactive = FALSE)
#
#
# })
output$plot_correlation <- renderPlotly(
MQanalyser::plot_correlationly(dep()) %>%
layout(height = 800, width = 800)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.