html_functions.R

myTabl = function(data){
  
  DT::datatable(data, rownames = FALSE,
                class = 'cell-border stripe',
                extensions = 'Buttons',
                options = list(dom = 'Bfrtip',
                               buttons = c('copy', 'excel', 'pdf'),
                              autoWidth = TRUE))
}

myPlot = function(data){
  
  
}