output$tableAllDat <- DT::renderDataTable({
estDat <- getEstDat()
regDat <- getRegDat()
datP <- allMISTEdat(estDat, regDat)
DT::datatable(datP, options = list(scrollX = TRUE, scrolly = TRUE), rownames = FALSE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.