library(LDAvis)
shinyUI(
fluidPage(
sliderInput("nTerms", "Number of terms to display", min = 20, max = 40, value = 30),
textOutput("termClicked"),
textOutput("topicClicked"),
visOutput('myChart')
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.