knitr::opts_chunk$set(echo = F, warning = F, message = F, cache= F) library(reshape2) library(dplyr) library(data.table) library(cowplot) library(gfplot) library(gaofenglib) extrafont::loadfonts() # option # library(caret) # library(DT)
r Sys.Date()
data <- cars datatable(data, filter = "top", extensions = 'Buttons', options = list( dom = 'Bfrtip', buttons = c('copy', 'csv', 'excel', 'pdf', 'print') )) %>% formatSignif(1:ncol(data), 3)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.