Сделайте DT (DataTable) отзывчивым, используя flexdashboard с Shiny в R

Question

Следующий пример (файл ex.Rmd) приводит к горизонтальной полосе прокрутки, когда ширина окна мала. Есть ли способ сделать таблицу полностью отзывчивой, т.е. убрать горизонтальную прокрутку и добавить столбцы под свернутую информацию?

    ---
    title: "Untitled"
    output: 
      flexdashboard::flex_dashboard:
        orientation: rows
        vertical_layout: fill
    runtime: shiny
    editor_options: 
      chunk_output_type: console
    ---

    ```{r setup, include=FALSE}
    library(flexdashboard)
    library(DT)
    ```

    Menu
    =======================================================================

    Row
    -----------------------------------------------------------------------

    ### Testing  

    ```{r}
    renderDT(head(mtcars), extensions = c('Responsive'))
    ```

Answer 1

А как же

renderDT({
  datatable(head(mtcars), extensions = c('Responsive'), 
            options = list(responsive = TRUE))
})