library(DT)
## Warning: package 'DT' was built under R version 3.2.3
#datatable(head(iris,100), class = 'cell-border stripe', caption = 'Table 1: This is a simple caption for the table.')



#iris2 = iris[c(1:10, 51:60, 101:110), ]
#datatable(iris2, filter = 'top', options = list(pageLength = 5, autoWidth = TRUE))



employee = data.frame(
  `First name` = character(), `Last name` = character(), Position = character(),
  Office = character(), `Start date` = character(), Salary = numeric(),
  check.names = FALSE
)
datatable(employee, rownames = FALSE, options = list(
  ajax = list(
    serverSide = TRUE, processing = TRUE,
    url = 'http://datatables.net/examples/server_side/scripts/jsonp.php',
    dataType = 'jsonp'
  )
))