DT::renderDataTable({
data <- head(mtcars, n = input$maxrows)
DT::datatable(data, options = list(
bPaginate = FALSE
))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.