2 Convert mtcars to a tibble, and wrap in datatable:

datatable(as_tibble(mtcars))