view_table <- function(df) {
DT::datatable(df,
options = list(pageLength = 50,
info = FALSE,
lengthMenu = list(c(25, 50, 100, -1),
c("25", "50", "100", "All"))))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.